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.91 by root, Fri Jan 13 01:09:37 2006 UTC vs.
Revision 1.95 by elmex, Tue Jan 17 13:19:45 2006 UTC

… …
66 URxvt.selection.pattern-0: \\|([^|]+)\\| 66 URxvt.selection.pattern-0: \\|([^|]+)\\|
67 67
68You can look at the source of the selection extension to see more 68You can look at the source of the selection extension to see more
69interesting uses, such as parsing a line from beginning to end. 69interesting uses, such as parsing a line from beginning to end.
70 70
71This extension also offers the following bindable keyboard command: 71This extension also offers following bindable keyboard commands:
72 72
73=over 4 73=over 4
74 74
75=item rot13 75=item rot13
76 76
77Rot-13 the selection when activated. Used via keyboard trigger: 77Rot-13 the selection when activated. Used via keyboard trigger:
78 78
79 URxvt.keysym.C-M-r: perl:selection:rot13 79 URxvt.keysym.C-M-r: perl:selection:rot13
80
81=item remote-pastebin
82
83Upload the selection as textfile to a remote site.
84
85 URxvt.keysym.C-M-e: perl:selection:remote-pastebin
86
87To set the command to upload the file set this resource:
88
89 URxvt.selection-pastebin-cmd: rsync -apP % ruth:/var/www/www.ta-sa.org/files/txt/.
90
91The % is the placeholder for the textfile. The name of the textfile is the hex encoded
92md5 sum of the selection.
93After an successful upload the selection will be replaced by the following url
94(the % is the placeholder for the filename):
95
96 URxvt.selection-pastebin-url: http://www.ta-sa.org/files/txt/%
80 97
81=back 98=back
82 99
83=item option-popup (enabled by default) 100=item option-popup (enabled by default)
84 101
… …
120 137
121For example, the following will transform selections of the form 138For example, the following will transform selections of the form
122C<filename:number>, often seen in compiler messages, into C<vi +$filename 139C<filename:number>, often seen in compiler messages, into C<vi +$filename
123$word>: 140$word>:
124 141
125 URxvt.selection-autotransform.0: s/^(\\S+):(\\d+):?$/vi +$2 \\Q$1\\E\\x0d/ 142 URxvt.selection-autotransform.0: s/^([^:[:space:]]+):(\\d+):?$/vi +$2 \\Q$1\\E\\x0d/
126 143
127And this example matches the same,but replaces it with vi-commands you can 144And this example matches the same,but replaces it with vi-commands you can
128paste directly into your (vi :) editor: 145paste directly into your (vi :) editor:
129 146
130 URxvt.selection-autotransform.0: s/^(S+):(d+):?$/\\x1b:e \\Q$1\\E\\x0d:$2\\x0d/ 147 URxvt.selection-autotransform.0: s/^([^:[:space:]]+(\\d+):?$/\\x1b:e \\Q$1\\E\\x0d:$2\\x0d/
131 148
132Of course, this can be modified to suit your needs and your editor :) 149Of course, this can be modified to suit your needs and your editor :)
133 150
134To expand the example above to typical perl error messages ("XXX at 151To expand the example above to typical perl error messages ("XXX at
135FILENAME line YYY."), you need a slightly more elaborate solution: 152FILENAME line YYY."), you need a slightly more elaborate solution:
… …
371 388
372Called whenever the user presses a key combination that has a 389Called whenever the user presses a key combination that has a
373C<perl:string> action bound to it (see description of the B<keysym> 390C<perl:string> action bound to it (see description of the B<keysym>
374resource in the @@RXVT_NAME@@(1) manpage). 391resource in the @@RXVT_NAME@@(1) manpage).
375 392
393=item on_x_event $term, $event
394
395Called on every X event received on the vt window (and possibly other
396windows). Should only be used as a last resort. Most event structure
397members are not passed.
398
376=item on_focus_in $term 399=item on_focus_in $term
377 400
378Called whenever the window gets the keyboard focus, before rxvt-unicode 401Called whenever the window gets the keyboard focus, before rxvt-unicode
379does focus in processing. 402does focus in processing.
380 403
… …
490=item urxvt::CurrentTime 513=item urxvt::CurrentTime
491 514
492=item urxvt::ShiftMask, LockMask, ControlMask, Mod1Mask, Mod2Mask, 515=item urxvt::ShiftMask, LockMask, ControlMask, Mod1Mask, Mod2Mask,
493Mod3Mask, Mod4Mask, Mod5Mask, Button1Mask, Button2Mask, Button3Mask, 516Mod3Mask, Mod4Mask, Mod5Mask, Button1Mask, Button2Mask, Button3Mask,
494Button4Mask, Button5Mask, AnyModifier 517Button4Mask, Button5Mask, AnyModifier
518
519=item urxvt::NoEventMask, KeyPressMask, KeyReleaseMask,
520ButtonPressMask, ButtonReleaseMask, EnterWindowMask, LeaveWindowMask,
521PointerMotionMask, PointerMotionHintMask, Button1MotionMask, Button2MotionMask,
522Button3MotionMask, Button4MotionMask, Button5MotionMask, ButtonMotionMask,
523KeymapStateMask, ExposureMask, VisibilityChangeMask, StructureNotifyMask,
524ResizeRedirectMask, SubstructureNotifyMask, SubstructureRedirectMask,
525FocusChangeMask, PropertyChangeMask, ColormapChangeMask, OwnerGrabButtonMask
526
527=item urxvt::KeyPress, KeyRelease, ButtonPress, ButtonRelease, MotionNotify,
528EnterNotify, LeaveNotify, FocusIn, FocusOut, KeymapNotify, Expose,
529GraphicsExpose, NoExpose, VisibilityNotify, CreateNotify, DestroyNotify,
530UnmapNotify, MapNotify, MapRequest, ReparentNotify, ConfigureNotify,
531ConfigureRequest, GravityNotify, ResizeRequest, CirculateNotify,
532CirculateRequest, PropertyNotify, SelectionClear, SelectionRequest,
533SelectionNotify, ColormapNotify, ClientMessage, MappingNotify
495 534
496Various constants for use in X calls and event processing. 535Various constants for use in X calls and event processing.
497 536
498=back 537=back
499 538
… …
567 delete $ENV{CDPATH}; 606 delete $ENV{CDPATH};
568 delete $ENV{BASH_ENV}; 607 delete $ENV{BASH_ENV};
569 $ENV{PATH} = "/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin:/opt/bin:/opt/sbin"; 608 $ENV{PATH} = "/bin:/sbin:/usr/bin:/usr/sbin:/usr/local/bin:/usr/local/sbin:/opt/bin:/opt/sbin";
570} 609}
571 610
572my @hook_count;
573my $verbosity = $ENV{URXVT_PERL_VERBOSITY}; 611my $verbosity = $ENV{URXVT_PERL_VERBOSITY};
574 612
575sub verbose { 613sub verbose {
576 my ($level, $msg) = @_; 614 my ($level, $msg) = @_;
577 warn "$msg\n" if $level <= $verbosity; 615 warn "$msg\n" if $level <= $verbosity;
… …
665 verbose 11, "$HOOKNAME[$htype] returning <$retval>" 703 verbose 11, "$HOOKNAME[$htype] returning <$retval>"
666 if $verbosity >= 11; 704 if $verbosity >= 11;
667 } 705 }
668 706
669 if ($htype == 1) { # DESTROY 707 if ($htype == 1) { # DESTROY
670 if (my $hook = delete $TERM->{_hook}) {
671 for my $htype (0..$#$hook) {
672 $hook_count[$htype] -= scalar keys %{ $hook->[$htype] || {} }
673 or set_should_invoke $htype, 0;
674 }
675 }
676
677 # clear package objects 708 # clear package objects
678 %$_ = () for values %{ $TERM->{_pkg} }; 709 %$_ = () for values %{ $TERM->{_pkg} };
679 710
680 # clear package 711 # clear package
681 %$TERM = (); 712 %$TERM = ();
… …
707 while (my ($name, $cb) = each %hook) { 738 while (my ($name, $cb) = each %hook) {
708 my $htype = $HOOKTYPE{uc $name}; 739 my $htype = $HOOKTYPE{uc $name};
709 defined $htype 740 defined $htype
710 or Carp::croak "unsupported hook type '$name'"; 741 or Carp::croak "unsupported hook type '$name'";
711 742
743 $self->set_should_invoke ($htype, +1)
712 unless (exists $self->{term}{_hook}[$htype]{$pkg}) { 744 unless exists $self->{term}{_hook}[$htype]{$pkg};
713 $hook_count[$htype]++
714 or urxvt::set_should_invoke $htype, 1;
715 }
716 745
717 $self->{term}{_hook}[$htype]{$pkg} = $cb; 746 $self->{term}{_hook}[$htype]{$pkg} = $cb;
718 } 747 }
719} 748}
720 749
… …
725 for my $name (@hook) { 754 for my $name (@hook) {
726 my $htype = $HOOKTYPE{uc $name}; 755 my $htype = $HOOKTYPE{uc $name};
727 defined $htype 756 defined $htype
728 or Carp::croak "unsupported hook type '$name'"; 757 or Carp::croak "unsupported hook type '$name'";
729 758
759 $self->set_should_invoke ($htype, -1)
730 if (delete $self->{term}{_hook}[$htype]{$pkg}) { 760 if delete $self->{term}{_hook}[$htype]{$pkg};
731 --$hook_count[$htype]
732 or urxvt::set_should_invoke $htype, 0;
733 }
734 } 761 }
735} 762}
736 763
737our $AUTOLOAD; 764our $AUTOLOAD;
738 765
… …
1143 1170
1144=item $windowid = $term->vt 1171=item $windowid = $term->vt
1145 1172
1146Return the window id of the terminal window. 1173Return the window id of the terminal window.
1147 1174
1175=item $term->vt_emask_add ($x_event_mask)
1176
1177Adds the specified events to the vt event mask. Useful e.g. when you want
1178to receive pointer events all the times:
1179
1180 $term->vt_emask_add (urxvt::PointerMotionMask);
1181
1148=item $window_width = $term->width 1182=item $window_width = $term->width
1149 1183
1150=item $window_height = $term->height 1184=item $window_height = $term->height
1151 1185
1152=item $font_width = $term->fwidth 1186=item $font_width = $term->fwidth
… …
1165 1199
1166=item $max_scrollback = $term->saveLines 1200=item $max_scrollback = $term->saveLines
1167 1201
1168=item $nrow_plus_saveLines = $term->total_rows 1202=item $nrow_plus_saveLines = $term->total_rows
1169 1203
1170=item $lines_in_scrollback = $term->nsaved 1204=item $topmost_scrollback_row = $term->top_row
1171 1205
1172Return various integers describing terminal characteristics. 1206Return various integers describing terminal characteristics.
1173 1207
1174=item $x_display = $term->display_id 1208=item $x_display = $term->display_id
1175 1209
… …
1203Return the modifier masks corresponding to the "ISO Level 3 Shift" (often 1237Return the modifier masks corresponding to the "ISO Level 3 Shift" (often
1204AltGr), the meta key (often Alt) and the num lock key, if applicable. 1238AltGr), the meta key (often Alt) and the num lock key, if applicable.
1205 1239
1206=item $view_start = $term->view_start ([$newvalue]) 1240=item $view_start = $term->view_start ([$newvalue])
1207 1241
1208Returns the negative row number of the topmost line. Minimum value is 1242Returns the row number of the topmost displayed line. Maximum value is
1209C<0>, which displays the normal terminal contents. Larger values scroll 1243C<0>, which displays the normal terminal contents. Lower values scroll
1210this many lines into the scrollback buffer. 1244this many lines into the scrollback buffer.
1211 1245
1212=item $term->want_refresh 1246=item $term->want_refresh
1213 1247
1214Requests a screen refresh. At the next opportunity, rxvt-unicode will 1248Requests a screen refresh. At the next opportunity, rxvt-unicode will

Diff Legend

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