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.142 by root, Thu Jul 6 18:56:10 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
… …
255 261
256 @@RXVT_NAME@@ -pt OnTheSpot -pe xim-onthespot 262 @@RXVT_NAME@@ -pt OnTheSpot -pe xim-onthespot
257 263
258=item automove-background 264=item automove-background
259 265
260This is basically a one-line extension that dynamically changes the background pixmap offset 266This is basically a very small extension that dynamically changes the
261to the window position, in effect creating the same effect as pseudo transparency with 267background pixmap offset to the window position, in effect creating the
262a custom pixmap. No scaling is supported in this mode. Exmaple: 268same effect as pseudo transparency with a custom pixmap. No scaling is
269supported in this mode. Exmaple:
263 270
264 @@RXVT_NAME@@ -pixmap background.xpm -pe automove-background 271 @@RXVT_NAME@@ -pixmap background.xpm -pe automove-background
265 272
266=item block-graphics-to-ascii 273=item block-graphics-to-ascii
267 274
268A not very useful example of filtering all text output to the terminal, 275A not very useful example of filtering all text output to the terminal
269by replacing all line-drawing characters (U+2500 .. U+259F) by a 276by replacing all line-drawing characters (U+2500 .. U+259F) by a
270similar-looking ascii character. 277similar-looking ascii character.
271 278
272=item digital-clock 279=item digital-clock
273 280
… …
368 375
369=back 376=back
370 377
371=head2 Extension Objects 378=head2 Extension Objects
372 379
373Very perl extension is a perl class. A separate perl object is created 380Every 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 381for 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 382hooks. So extensions can use their C<$self> object without having to think
376about other extensions, with the exception of methods and members that 383about other extensions, with the exception of methods and members that
377begin with an underscore character C<_>: these are reserved for internal 384begin with an underscore character C<_>: these are reserved for internal
378use. 385use.
… …
907 914
908 if (my $cb = $TERM->{_hook}[$htype]) { 915 if (my $cb = $TERM->{_hook}[$htype]) {
909 verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")" 916 verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")"
910 if $verbosity >= 10; 917 if $verbosity >= 10;
911 918
912 keys %$cb; 919 for my $pkg (keys %$cb) {
913
914 while (my ($pkg, $cb) = each %$cb) {
915 my $retval_ = eval { $cb->($TERM->{_pkg}{$pkg}, @_) }; 920 my $retval_ = eval { $cb->{$pkg}->($TERM->{_pkg}{$pkg}, @_) };
916 $retval ||= $retval_; 921 $retval ||= $retval_;
917 922
918 if ($@) { 923 if ($@) {
919 $TERM->ungrab; # better to lose the grab than the session 924 $TERM->ungrab; # better to lose the grab than the session
920 warn $@; 925 warn $@;

Diff Legend

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