ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/perl/mark-urls
(Generate patch)

Comparing rxvt-unicode/src/perl/mark-urls (file contents):
Revision 1.8 by root, Tue Jan 17 16:22:41 2006 UTC vs.
Revision 1.9 by root, Thu Jan 19 09:47:15 2006 UTC

49 | urxvt::ShiftMask | urxvt::ControlMask; 49 | urxvt::ShiftMask | urxvt::ControlMask;
50 50
51 if ($event->{button} == 2 && ($event->{state} & $mask) == 0) { 51 if ($event->{button} == 2 && ($event->{state} & $mask) == 0) {
52 while ($text =~ /$url/g) { 52 while ($text =~ /$url/g) {
53 if ($-[1] <= $col && $+[1] >= $col) { 53 if ($-[1] <= $col && $+[1] >= $col) {
54 urxvt::exec_async $self->{browser}, $1; 54 $self->exec_async ($self->{browser}, $1);
55 return 1; 55 return 1;
56 } 56 }
57 } 57 }
58 } 58 }
59 59

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines