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.137 by root, Sat Mar 4 20:17:52 2006 UTC vs.
Revision 1.143 by root, Thu Jul 6 23:48:11 2006 UTC

151bottom. C<Escape> leaves search mode and returns to the point where search 151bottom. C<Escape> leaves search mode and returns to the point where search
152was started, while C<Enter> or C<Return> stay at the current position and 152was started, while C<Enter> or C<Return> stay at the current position and
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
156The regex defaults to "(?i)", resulting in a case-insensitive search. To
157get a case-sensitive search you can delete this prefix using C<BackSpace>
158or simply use an uppercase character which removes the "(?i)" prefix.
159
160See L<perlre> for more info about perl regular expression syntax.
161
156=item readline (enabled by default) 162=item readline (enabled by default)
157 163
158A support package that tries to make editing with readline easier. At 164A support package that tries to make editing with readline easier. At
159the moment, it reacts to clicking shift-left mouse button by trying to 165the 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 166move the text cursor to this position. It does so by generating as many
253You enable it by specifying this extension and a preedit style of 259You enable it by specifying this extension and a preedit style of
254C<OnTheSpot>, i.e.: 260C<OnTheSpot>, i.e.:
255 261
256 @@RXVT_NAME@@ -pt OnTheSpot -pe xim-onthespot 262 @@RXVT_NAME@@ -pt OnTheSpot -pe xim-onthespot
257 263
264=item kuake<hotkey>
265
266A very primitive quake-console-like extension. It was inspired by a
267description of how the programs C<kuake> and C<yakuake> work: Whenever the
268user presses a global accelerator key (by default C<F10>), the terminal
269will show or hide itself. Another press of the accelerator key will hide
270or show it again.
271
272Initially, the window will not be shown when using this extension.
273
274This is useful if you need a single terminal thats not using any desktop
275space most of the time but is quickly available at the press of a key.
276
277The accelerator key is grabbed regardless of any modifers, so this
278extension will actually grab a physical key just for this function.
279
280If you want a quake-like animation, tell your window manager to do so
281(fvwm can do it).
282
258=item automove-background 283=item automove-background
259 284
260This is basically a one-line extension that dynamically changes the background pixmap offset 285This is basically a very small extension that dynamically changes the
261to the window position, in effect creating the same effect as pseudo transparency with 286background pixmap offset to the window position, in effect creating the
262a custom pixmap. No scaling is supported in this mode. Exmaple: 287same effect as pseudo transparency with a custom pixmap. No scaling is
288supported in this mode. Exmaple:
263 289
264 @@RXVT_NAME@@ -pixmap background.xpm -pe automove-background 290 @@RXVT_NAME@@ -pixmap background.xpm -pe automove-background
265 291
266=item block-graphics-to-ascii 292=item block-graphics-to-ascii
267 293
268A not very useful example of filtering all text output to the terminal, 294A not very useful example of filtering all text output to the terminal
269by replacing all line-drawing characters (U+2500 .. U+259F) by a 295by replacing all line-drawing characters (U+2500 .. U+259F) by a
270similar-looking ascii character. 296similar-looking ascii character.
271 297
272=item digital-clock 298=item digital-clock
273 299
368 394
369=back 395=back
370 396
371=head2 Extension Objects 397=head2 Extension Objects
372 398
373Very perl extension is a perl class. A separate perl object is created 399Every perl extension is a perl class. A separate perl object is created
374for each terminal and each extension and passed as the first parameter to 400for each terminal and each extension and passed as the first parameter to
375hooks. So extensions can use their C<$self> object without having to think 401hooks. So extensions can use their C<$self> object without having to think
376about other extensions, with the exception of methods and members that 402about other extensions, with the exception of methods and members that
377begin with an underscore character C<_>: these are reserved for internal 403begin with an underscore character C<_>: these are reserved for internal
378use. 404use.
574=item on_x_event $term, $event 600=item on_x_event $term, $event
575 601
576Called on every X event received on the vt window (and possibly other 602Called on every X event received on the vt window (and possibly other
577windows). Should only be used as a last resort. Most event structure 603windows). Should only be used as a last resort. Most event structure
578members are not passed. 604members are not passed.
605
606=item on_root_event $term, $event
607
608Like C<on_x_event>, but is called for events on the root window.
579 609
580=item on_focus_in $term 610=item on_focus_in $term
581 611
582Called whenever the window gets the keyboard focus, before rxvt-unicode 612Called whenever the window gets the keyboard focus, before rxvt-unicode
583does focus in processing. 613does focus in processing.
907 937
908 if (my $cb = $TERM->{_hook}[$htype]) { 938 if (my $cb = $TERM->{_hook}[$htype]) {
909 verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")" 939 verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")"
910 if $verbosity >= 10; 940 if $verbosity >= 10;
911 941
912 keys %$cb; 942 for my $pkg (keys %$cb) {
913
914 while (my ($pkg, $cb) = each %$cb) {
915 my $retval_ = eval { $cb->($TERM->{_pkg}{$pkg}, @_) }; 943 my $retval_ = eval { $cb->{$pkg}->($TERM->{_pkg}{$pkg}, @_) };
916 $retval ||= $retval_; 944 $retval ||= $retval_;
917 945
918 if ($@) { 946 if ($@) {
919 $TERM->ungrab; # better to lose the grab than the session 947 $TERM->ungrab; # better to lose the grab than the session
920 warn $@; 948 warn $@;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines