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.173 by root, Wed Nov 5 12:45:36 2008 UTC vs.
Revision 1.178 by root, Sat Dec 26 09:02:42 2009 UTC

372 372
373I<Note to xrdb users:> xrdb uses the C preprocessor, which might interpret 373I<Note to xrdb users:> xrdb uses the C preprocessor, which might interpret
374the double C</> characters as comment start. Use C<\057\057> instead, 374the double C</> characters as comment start. Use C<\057\057> instead,
375which works regardless of wether xrdb is used to parse the resource file 375which works regardless of wether xrdb is used to parse the resource file
376or not. 376or not.
377
378=item macosx-pastebin and macosx-pastebin-native
379
380These two modules implement an extended clipboard for Mac OS X. They are
381used like this:
382
383 URxvt.perl-ext-common: default,macosx-clipboard
384 URxvt.keysym.M-c: perl:macosx-clipboard:copy
385 URxvt.keysym.M-v: perl:macosx-clipboard:paste
386
387The difference between them is that the native variant requires a
388perl from apple's devkit or so, and C<maxosx-pastebin> requires the
389C<Mac::Pasteboard> module, works with other perls, has fewer bugs, is
390simpler etc. etc.
377 391
378=item example-refresh-hooks 392=item example-refresh-hooks
379 393
380Displays a very simple digital clock in the upper right corner of the 394Displays a very simple digital clock in the upper right corner of the
381window. Illustrates overwriting the refresh callbacks to create your own 395window. Illustrates overwriting the refresh callbacks to create your own
1110is that you cannot use blocking APIs, but the non-blocking variant should 1124is that you cannot use blocking APIs, but the non-blocking variant should
1111work. 1125work.
1112 1126
1113=cut 1127=cut
1114 1128
1115our $VERSION = '3.4'; 1129our $VERSION = '5.23';
1116 1130
1117$INC{"urxvt/anyevent.pm"} = 1; # mark us as there 1131$INC{"urxvt/anyevent.pm"} = 1; # mark us as there
1118push @AnyEvent::REGISTRY, [urxvt => urxvt::anyevent::]; 1132push @AnyEvent::REGISTRY, [urxvt => urxvt::anyevent::];
1119 1133
1120sub timer { 1134sub timer {
1122 1136
1123 my $cb = $arg{cb}; 1137 my $cb = $arg{cb};
1124 1138
1125 urxvt::timer 1139 urxvt::timer
1126 ->new 1140 ->new
1127 ->start (urxvt::NOW + $arg{after}) 1141 ->after ($arg{after})
1128 ->cb (sub { 1142 ->interval ($arg{interval})
1143 ->start
1144 ->cb ($argv{interval} ? $cb : sub {
1129 $_[0]->stop; # need to cancel manually 1145 $_[0]->stop; # need to cancel manually
1130 $cb->(); 1146 $cb->();
1131 }) 1147 })
1132} 1148}
1133 1149
1134sub io { 1150sub io {
1135 my ($class, %arg) = @_; 1151 my ($class, %arg) = @_;
1136 1152
1137 my $cb = $arg{cb}; 1153 my $cb = $arg{cb};
1154 my $fd = fileno $arg{fh};
1155 defined $fd or $fd = $arg{fh};
1138 1156
1139 bless [$arg{fh}, urxvt::iow 1157 bless [$arg{fh}, urxvt::iow
1140 ->new 1158 ->new
1141 ->fd (fileno $arg{fh}) 1159 ->fd ($fd)
1142 ->events (($arg{poll} =~ /r/ ? 1 : 0) 1160 ->events (($arg{poll} =~ /r/ ? 1 : 0)
1143 | ($arg{poll} =~ /w/ ? 2 : 0)) 1161 | ($arg{poll} =~ /w/ ? 2 : 0))
1144 ->start 1162 ->start
1145 ->cb (sub { 1163 ->cb ($cb)
1146 $cb->(($_[1] & 1 ? 'r' : '')
1147 . ($_[1] & 2 ? 'w' : ''));
1148 })],
1149 urxvt::anyevent:: 1164 ], urxvt::anyevent::
1165}
1166
1167sub idle {
1168 my ($class, %arg) = @_;
1169
1170 my $cb = $arg{cb};
1171
1172 urxvt::iw
1173 ->new
1174 ->start
1175 ->cb ($cb)
1176}
1177
1178sub child {
1179 my ($class, %arg) = @_;
1180
1181 my $cb = $arg{cb};
1182
1183 urxvt::pw
1184 ->new
1185 ->start ($arg{pid})
1186 ->cb (sub {
1187 $_[0]->stop; # need to cancel manually
1188 $cb->($_[0]->rpid, $_[0]->rstatus);
1189 })
1150} 1190}
1151 1191
1152sub DESTROY { 1192sub DESTROY {
1153 $_[0][1]->stop; 1193 $_[0][1]->stop;
1154} 1194}
1284 1324
1285 answerbackstring backgroundPixmap backspace_key boldFont boldItalicFont 1325 answerbackstring backgroundPixmap backspace_key boldFont boldItalicFont
1286 borderLess chdir color cursorBlink cursorUnderline cutchars delete_key 1326 borderLess chdir color cursorBlink cursorUnderline cutchars delete_key
1287 display_name embed ext_bwidth fade font geometry hold iconName 1327 display_name embed ext_bwidth fade font geometry hold iconName
1288 imFont imLocale inputMethod insecure int_bwidth intensityStyles 1328 imFont imLocale inputMethod insecure int_bwidth intensityStyles
1289 italicFont jumpScroll lineSpace loginShell mapAlert meta8 modifier 1329 italicFont jumpScroll lineSpace letterSpace loginShell mapAlert meta8
1290 mouseWheelScrollPage name override_redirect pastableTabs path perl_eval 1330 modifier mouseWheelScrollPage name override_redirect pastableTabs path
1291 perl_ext_1 perl_ext_2 perl_lib pointerBlank pointerBlankDelay 1331 perl_eval perl_ext_1 perl_ext_2 perl_lib pointerBlank pointerBlankDelay
1292 preeditType print_pipe pty_fd reverseVideo saveLines scrollBar 1332 preeditType print_pipe pty_fd reverseVideo saveLines scrollBar
1293 scrollBar_align scrollBar_floating scrollBar_right scrollBar_thickness 1333 scrollBar_align scrollBar_floating scrollBar_right scrollBar_thickness
1294 scrollTtyKeypress scrollTtyOutput scrollWithBuffer scrollstyle 1334 scrollTtyKeypress scrollTtyOutput scrollWithBuffer scrollstyle
1295 secondaryScreen secondaryScroll shade term_name title 1335 secondaryScreen secondaryScroll shade term_name title
1296 transient_for transparent transparent_all tripleclickwords utmpInhibit 1336 transient_for transparent transparent_all tripleclickwords utmpInhibit

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines