ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/urxvt.pm
(Generate patch)

Comparing rxvt-unicode/src/urxvt.pm (file contents):
Revision 1.117 by ayin, Fri Jan 20 18:02:43 2006 UTC vs.
Revision 1.124 by root, Sun Jan 22 11:57:06 2006 UTC

127bottom. C<Escape> leaves search mode and returns to the point where search 127bottom. C<Escape> leaves search mode and returns to the point where search
128was started, while C<Enter> or C<Return> stay at the current position and 128was started, while C<Enter> or C<Return> stay at the current position and
129additionally stores the first match in the current line into the primary 129additionally stores the first match in the current line into the primary
130selection. 130selection.
131 131
132=item readline (enabled by default)
133
134A support package that tries to make editing with readline easier. At the
135moment, it reacts to clicking with the left mouse button by trying to
136move the text cursor to this position. It does so by generating as many
137cursor-left or cursor-right keypresses as required (the this only works
138for programs that correctly support wide characters).
139
140To avoid too many false positives, this is only done when:
141
142=over 4
143
144=item - the mouse is on the same (multi-row-) line as the text cursor.
145
146=item - the primary screen is currently being displayed.
147
148=item - the text cursor is visible.
149
150=back
151
152The normal selection mechanism isn't disabled, so quick successive clicks
153might interfere with selection creation in harmless ways.
154
132=item selection-autotransform 155=item selection-autotransform
133 156
134This selection allows you to do automatic transforms on a selection 157This selection allows you to do automatic transforms on a selection
135whenever a selection is made. 158whenever a selection is made.
136 159
476Called wheneever the window loses keyboard focus, before rxvt-unicode does 499Called wheneever the window loses keyboard focus, before rxvt-unicode does
477focus out processing. 500focus out processing.
478 501
479=item on_configure_notify $term, $event 502=item on_configure_notify $term, $event
480 503
504=item on_property_notify $term, $event
505
481=item on_key_press $term, $event, $keysym, $octets 506=item on_key_press $term, $event, $keysym, $octets
482 507
483=item on_key_release $term, $event, $keysym 508=item on_key_release $term, $event, $keysym
484 509
485=item on_button_press $term, $event 510=item on_button_press $term, $event
494 519
495Called whenever the corresponding X event is received for the terminal If 520Called whenever the corresponding X event is received for the terminal If
496the hook returns true, then the even will be ignored by rxvt-unicode. 521the hook returns true, then the even will be ignored by rxvt-unicode.
497 522
498The event is a hash with most values as named by Xlib (see the XEvent 523The event is a hash with most values as named by Xlib (see the XEvent
499manpage), with the additional members C<row> and C<col>, which are the row 524manpage), with the additional members C<row> and C<col>, which are the
500and column under the mouse cursor. 525(real, not screen-based) row and column under the mouse cursor.
501 526
502C<on_key_press> additionally receives the string rxvt-unicode would 527C<on_key_press> additionally receives the string rxvt-unicode would
503output, if any, in locale-specific encoding. 528output, if any, in locale-specific encoding.
504 529
505subwindow. 530subwindow.
535 560
536our $LIBDIR; 561our $LIBDIR;
537our $RESNAME; 562our $RESNAME;
538our $RESCLASS; 563our $RESCLASS;
539our $RXVTNAME; 564our $RXVTNAME;
565
566our $NOCHAR = chr 0xffff;
540 567
541=head2 Variables in the C<urxvt> Package 568=head2 Variables in the C<urxvt> Package
542 569
543=over 4 570=over 4
544 571
691 unless $msg =~ /\n$/; 718 unless $msg =~ /\n$/;
692 urxvt::warn ($msg); 719 urxvt::warn ($msg);
693 }; 720 };
694} 721}
695 722
723no warnings 'utf8';
724
696my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; 725my $verbosity = $ENV{URXVT_PERL_VERBOSITY};
697 726
698sub verbose { 727sub verbose {
699 my ($level, $msg) = @_; 728 my ($level, $msg) = @_;
700 warn "$msg\n" if $level <= $verbosity; 729 warn "$msg\n" if $level <= $verbosity;
716 745
717 open my $fh, "<:raw", $path 746 open my $fh, "<:raw", $path
718 or die "$path: $!"; 747 or die "$path: $!";
719 748
720 my $source = 749 my $source =
721 "package $pkg; use strict; use utf8;\n" 750 "package $pkg; use strict; use utf8; no warnings 'utf8';\n"
722 . "#line 1 \"$path\"\n{\n" 751 . "#line 1 \"$path\"\n{\n"
723 . (do { local $/; <$fh> }) 752 . (do { local $/; <$fh> })
724 . "\n};\n1"; 753 . "\n};\n1";
725 754
726 eval $source 755 eval $source
751 $TERM->register_package ($_) for @pkg; 780 $TERM->register_package ($_) for @pkg;
752 } 781 }
753 782
754 for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) { 783 for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) {
755 if ($_ eq "default") { 784 if ($_ eq "default") {
756 $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback); 785 $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback readline);
757 } elsif (/^-(.*)$/) { 786 } elsif (/^-(.*)$/) {
758 delete $ext_arg{$1}; 787 delete $ext_arg{$1};
759 } elsif (/^([^<]+)<(.*)>$/) { 788 } elsif (/^([^<]+)<(.*)>$/) {
760 push @{ $ext_arg{$1} }, $2; 789 push @{ $ext_arg{$1} }, $2;
761 } else { 790 } else {
1258 1287
1259Normally its not a good idea to use this function, as programs might be 1288Normally its not a good idea to use this function, as programs might be
1260confused by changes in cursor position or scrolling. Its useful inside a 1289confused by changes in cursor position or scrolling. Its useful inside a
1261C<on_add_lines> hook, though. 1290C<on_add_lines> hook, though.
1262 1291
1292=item $term->scr_change_screen ($screen)
1293
1294Switch to given screen - 0 primary, 1 secondary.
1295
1263=item $term->cmd_parse ($octets) 1296=item $term->cmd_parse ($octets)
1264 1297
1265Similar to C<scr_add_lines>, but the argument must be in the 1298Similar to C<scr_add_lines>, but the argument must be in the
1266locale-specific encoding of the terminal and can contain command sequences 1299locale-specific encoding of the terminal and can contain command sequences
1267(escape codes) that will be interpreted. 1300(escape codes) that will be interpreted.
1350=item $modifiermask = $term->ModNumLockMask 1383=item $modifiermask = $term->ModNumLockMask
1351 1384
1352Return the modifier masks corresponding to the "ISO Level 3 Shift" (often 1385Return the modifier masks corresponding to the "ISO Level 3 Shift" (often
1353AltGr), the meta key (often Alt) and the num lock key, if applicable. 1386AltGr), the meta key (often Alt) and the num lock key, if applicable.
1354 1387
1388=item $screen = $term->current_screen
1389
1390Returns the currently displayed screen (0 primary, 1 secondary).
1391
1392=item $cursor_is_hidden = $term->hidden_cursor
1393
1394Returns wether the cursor is currently hidden or not.
1395
1355=item $view_start = $term->view_start ([$newvalue]) 1396=item $view_start = $term->view_start ([$newvalue])
1356 1397
1357Returns the row number of the topmost displayed line. Maximum value is 1398Returns the row number of the topmost displayed line. Maximum value is
1358C<0>, which displays the normal terminal contents. Lower values scroll 1399C<0>, which displays the normal terminal contents. Lower values scroll
1359this many lines into the scrollback buffer. 1400this many lines into the scrollback buffer.
1378line, starting at column C<$start_col> (default C<0>), which is useful 1419line, starting at column C<$start_col> (default C<0>), which is useful
1379to replace only parts of a line. The font index in the rendition will 1420to replace only parts of a line. The font index in the rendition will
1380automatically be updated. 1421automatically be updated.
1381 1422
1382C<$text> is in a special encoding: tabs and wide characters that use more 1423C<$text> is in a special encoding: tabs and wide characters that use more
1383than one cell when displayed are padded with urxvt::NOCHAR characters 1424than one cell when displayed are padded with C<$urxvt::NOCHAR> (chr 65535)
1384(C<chr 65535>). Characters with combining characters and other characters 1425characters. Characters with combining characters and other characters that
1385that do not fit into the normal tetx encoding will be replaced with 1426do not fit into the normal tetx encoding will be replaced with characters
1386characters in the private use area. 1427in the private use area.
1387 1428
1388You have to obey this encoding when changing text. The advantage is 1429You have to obey this encoding when changing text. The advantage is
1389that C<substr> and similar functions work on screen cells and not on 1430that C<substr> and similar functions work on screen cells and not on
1390characters. 1431characters.
1391 1432
1565=item $term->ungrab 1606=item $term->ungrab
1566 1607
1567Calls XUngrab for the most recent grab. Is called automatically on 1608Calls XUngrab for the most recent grab. Is called automatically on
1568evaluation errors, as it is better to lose the grab in the error case as 1609evaluation errors, as it is better to lose the grab in the error case as
1569the session. 1610the session.
1611
1612=item $atom = $term->XInternAtom ($atom_name[, $only_if_exists])
1613
1614=item $atom_name = $term->XGetAtomName ($atom)
1615
1616=item @atoms = $term->XListProperties ($window)
1617
1618=item ($type,$format,$octets) = $term->XGetWindowProperty ($window, $property)
1619
1620=item $term->XChangeWindowProperty ($window, $property, $type, $format, $octets)
1621
1622=item $term->XDeleteProperty ($window, $property)
1623
1624=item $window = $term->DefaultRootWindow
1625
1626=item $term->XReparentWindow ($window, $parent, [$x, $y])
1627
1628=item $term->XMapWindow ($window)
1629
1630=item $term->XUnmapWindow ($window)
1631
1632=item $term->XMoveResizeWindow ($window, $x, $y, $width, $height)
1633
1634=item ($x, $y, $child_window) = $term->XTranslateCoordinates ($src, $dst, $x, $y)
1635
1636=item $term->XChangeInput ($window, $add_events[, $del_events])
1637
1638Various X or X-related functions. The C<$term> object only serves as
1639the source of the display, otherwise those functions map more-or-less
1640directory onto the X functions of the same name.
1570 1641
1571=back 1642=back
1572 1643
1573=cut 1644=cut
1574 1645

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines