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.133 by root, Mon Feb 6 06:14:08 2006 UTC vs.
Revision 1.138 by root, Sat Mar 4 22:36:50 2006 UTC

… …
153additionally stores the first match in the current line into the primary 153additionally stores the first match in the current line into the primary
154selection. 154selection.
155 155
156=item readline (enabled by default) 156=item readline (enabled by default)
157 157
158A support package that tries to make editing with readline easier. At the 158A support package that tries to make editing with readline easier. At
159moment, it reacts to clicking with the left mouse button by trying to 159the moment, it reacts to clicking shift-left mouse button by trying to
160move the text cursor to this position. It does so by generating as many 160move the text cursor to this position. It does so by generating as many
161cursor-left or cursor-right keypresses as required (the this only works 161cursor-left or cursor-right keypresses as required (the this only works
162for programs that correctly support wide characters). 162for programs that correctly support wide characters).
163 163
164To avoid too many false positives, this is only done when: 164To avoid too many false positives, this is only done when:
… …
493 493
494It is called before lines are scrolled out (so rows 0 .. min ($lines - 1, 494It is called before lines are scrolled out (so rows 0 .. min ($lines - 1,
495$nrow - 1) represent the lines to be scrolled out). C<$saved> is the total 495$nrow - 1) represent the lines to be scrolled out). C<$saved> is the total
496number of lines that will be in the scrollback buffer. 496number of lines that will be in the scrollback buffer.
497 497
498=item on_osc_seq $term, $op, $args
499
500Called on every OSC sequence and can be used to suppress it or modify its
501behaviour. The default should be to return an empty list. A true value
502suppresses execution of the request completely. Make sure you don't get
503confused by recursive invocations when you output an osc sequence within
504this callback.
505
506C<on_osc_seq_perl> should be used for new behaviour.
507
498=item on_osc_seq $term, $string 508=item on_osc_seq_perl $term, $string
499 509
500Called whenever the B<ESC ] 777 ; string ST> command sequence (OSC = 510Called whenever the B<ESC ] 777 ; string ST> command sequence (OSC =
501operating system command) is processed. Cursor position and other state 511operating system command) is processed. Cursor position and other state
502information is up-to-date when this happens. For interoperability, the 512information is up-to-date when this happens. For interoperability, the
503string should start with the extension name and a colon, to distinguish 513string should start with the extension name and a colon, to distinguish
… …
552a C<perl:string> action bound to a key, see description of the B<keysym> 562a C<perl:string> action bound to a key, see description of the B<keysym>
553resource in the @@RXVT_NAME@@(1) manpage). 563resource in the @@RXVT_NAME@@(1) manpage).
554 564
555The event is simply the action string. This interface is assumed to change 565The event is simply the action string. This interface is assumed to change
556slightly in the future. 566slightly in the future.
567
568=item on_resize_all_windows $tern, $new_width, $new_height
569
570Called just after the new window size has been calculcated, but before
571windows are actually being resized or hints are being set. If this hook
572returns TRUE, setting of the window hints is being skipped.
557 573
558=item on_x_event $term, $event 574=item on_x_event $term, $event
559 575
560Called on every X event received on the vt window (and possibly other 576Called on every X event received on the vt window (and possibly other
561windows). Should only be used as a last resort. Most event structure 577windows). Should only be used as a last resort. Most event structure
… …
891 907
892 if (my $cb = $TERM->{_hook}[$htype]) { 908 if (my $cb = $TERM->{_hook}[$htype]) {
893 verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")" 909 verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")"
894 if $verbosity >= 10; 910 if $verbosity >= 10;
895 911
896 keys %$cb; 912 for my $pkg (keys %$cb) {
897
898 while (my ($pkg, $cb) = each %$cb) {
899 my $retval_ = eval { $cb->($TERM->{_pkg}{$pkg}, @_) }; 913 my $retval_ = eval { $cb->{$pkg}->($TERM->{_pkg}{$pkg}, @_) };
900 $retval ||= $retval_; 914 $retval ||= $retval_;
901 915
902 if ($@) { 916 if ($@) {
903 $TERM->ungrab; # better to lose the grab than the session 917 $TERM->ungrab; # better to lose the grab than the session
904 warn $@; 918 warn $@;
… …
1468=item $env = $term->env 1482=item $env = $term->env
1469 1483
1470Returns a copy of the environment in effect for the terminal as a hashref 1484Returns a copy of the environment in effect for the terminal as a hashref
1471similar to C<\%ENV>. 1485similar to C<\%ENV>.
1472 1486
1487=item @envv = $term->envv
1488
1489Returns the environment as array of strings of the form C<VAR=VALUE>.
1490
1491=item @argv = $term->argv
1492
1493Return the argument vector as this terminal, similar to @ARGV, but
1494includes the program name as first element.
1495
1473=cut 1496=cut
1474 1497
1475sub env { 1498sub env {
1476 if (my $env = $_[0]->_env) {
1477 +{ map /^([^=]+)(?:=(.*))?$/s && ($1 => $2), @$env } 1499 +{ map /^([^=]+)(?:=(.*))?$/s && ($1 => $2), $_[0]->envv }
1478 } else {
1479 +{ %ENV }
1480 }
1481} 1500}
1482 1501
1483=item $modifiermask = $term->ModLevel3Mask 1502=item $modifiermask = $term->ModLevel3Mask
1484 1503
1485=item $modifiermask = $term->ModMetaMask 1504=item $modifiermask = $term->ModMetaMask

Diff Legend

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