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.118 by root, Fri Jan 20 18:50:49 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
… …
496 519
497Called whenever the corresponding X event is received for the terminal If 520Called whenever the corresponding X event is received for the terminal If
498the 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.
499 522
500The 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
501manpage), 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
502and column under the mouse cursor. 525(real, not screen-based) row and column under the mouse cursor.
503 526
504C<on_key_press> additionally receives the string rxvt-unicode would 527C<on_key_press> additionally receives the string rxvt-unicode would
505output, if any, in locale-specific encoding. 528output, if any, in locale-specific encoding.
506 529
507subwindow. 530subwindow.
… …
537 560
538our $LIBDIR; 561our $LIBDIR;
539our $RESNAME; 562our $RESNAME;
540our $RESCLASS; 563our $RESCLASS;
541our $RXVTNAME; 564our $RXVTNAME;
565
566our $NOCHAR = chr 0xffff;
542 567
543=head2 Variables in the C<urxvt> Package 568=head2 Variables in the C<urxvt> Package
544 569
545=over 4 570=over 4
546 571
… …
693 unless $msg =~ /\n$/; 718 unless $msg =~ /\n$/;
694 urxvt::warn ($msg); 719 urxvt::warn ($msg);
695 }; 720 };
696} 721}
697 722
723no warnings 'utf8';
724
698my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; 725my $verbosity = $ENV{URXVT_PERL_VERBOSITY};
699 726
700sub verbose { 727sub verbose {
701 my ($level, $msg) = @_; 728 my ($level, $msg) = @_;
702 warn "$msg\n" if $level <= $verbosity; 729 warn "$msg\n" if $level <= $verbosity;
… …
718 745
719 open my $fh, "<:raw", $path 746 open my $fh, "<:raw", $path
720 or die "$path: $!"; 747 or die "$path: $!";
721 748
722 my $source = 749 my $source =
723 "package $pkg; use strict; use utf8;\n" 750 "package $pkg; use strict; use utf8; no warnings 'utf8';\n"
724 . "#line 1 \"$path\"\n{\n" 751 . "#line 1 \"$path\"\n{\n"
725 . (do { local $/; <$fh> }) 752 . (do { local $/; <$fh> })
726 . "\n};\n1"; 753 . "\n};\n1";
727 754
728 eval $source 755 eval $source
… …
753 $TERM->register_package ($_) for @pkg; 780 $TERM->register_package ($_) for @pkg;
754 } 781 }
755 782
756 for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) { 783 for (grep $_, map { split /,/, $TERM->resource ("perl_ext_$_") } 1, 2) {
757 if ($_ eq "default") { 784 if ($_ eq "default") {
758 $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback); 785 $ext_arg{$_} ||= [] for qw(selection option-popup selection-popup searchable-scrollback readline);
759 } elsif (/^-(.*)$/) { 786 } elsif (/^-(.*)$/) {
760 delete $ext_arg{$1}; 787 delete $ext_arg{$1};
761 } elsif (/^([^<]+)<(.*)>$/) { 788 } elsif (/^([^<]+)<(.*)>$/) {
762 push @{ $ext_arg{$1} }, $2; 789 push @{ $ext_arg{$1} }, $2;
763 } else { 790 } else {
… …
1260 1287
1261Normally 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
1262confused by changes in cursor position or scrolling. Its useful inside a 1289confused by changes in cursor position or scrolling. Its useful inside a
1263C<on_add_lines> hook, though. 1290C<on_add_lines> hook, though.
1264 1291
1292=item $term->scr_change_screen ($screen)
1293
1294Switch to given screen - 0 primary, 1 secondary.
1295
1265=item $term->cmd_parse ($octets) 1296=item $term->cmd_parse ($octets)
1266 1297
1267Similar 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
1268locale-specific encoding of the terminal and can contain command sequences 1299locale-specific encoding of the terminal and can contain command sequences
1269(escape codes) that will be interpreted. 1300(escape codes) that will be interpreted.
… …
1352=item $modifiermask = $term->ModNumLockMask 1383=item $modifiermask = $term->ModNumLockMask
1353 1384
1354Return the modifier masks corresponding to the "ISO Level 3 Shift" (often 1385Return the modifier masks corresponding to the "ISO Level 3 Shift" (often
1355AltGr), 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.
1356 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
1357=item $view_start = $term->view_start ([$newvalue]) 1396=item $view_start = $term->view_start ([$newvalue])
1358 1397
1359Returns the row number of the topmost displayed line. Maximum value is 1398Returns the row number of the topmost displayed line. Maximum value is
1360C<0>, which displays the normal terminal contents. Lower values scroll 1399C<0>, which displays the normal terminal contents. Lower values scroll
1361this many lines into the scrollback buffer. 1400this many lines into the scrollback buffer.
… …
1380line, 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
1381to 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
1382automatically be updated. 1421automatically be updated.
1383 1422
1384C<$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
1385than one cell when displayed are padded with urxvt::NOCHAR characters 1424than one cell when displayed are padded with C<$urxvt::NOCHAR> (chr 65535)
1386(C<chr 65535>). Characters with combining characters and other characters 1425characters. Characters with combining characters and other characters that
1387that 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
1388characters in the private use area. 1427in the private use area.
1389 1428
1390You have to obey this encoding when changing text. The advantage is 1429You have to obey this encoding when changing text. The advantage is
1391that 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
1392characters. 1431characters.
1393 1432
… …
1567=item $term->ungrab 1606=item $term->ungrab
1568 1607
1569Calls XUngrab for the most recent grab. Is called automatically on 1608Calls XUngrab for the most recent grab. Is called automatically on
1570evaluation 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
1571the 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.
1572 1641
1573=back 1642=back
1574 1643
1575=cut 1644=cut
1576 1645

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines