From: root Date: Sun, 10 Jun 2007 23:10:01 +0000 (+0000) Subject: *** empty log message *** X-Git-Url: http://git.openbox.org/?a=commitdiff_plain;h=f53fd15aa6889c8a8efdd1c27a8f223d479dd903;p=dana%2Furxvt.git *** empty log message *** --- diff --git a/Changes b/Changes index 67929f25..849abcd7 100644 --- a/Changes +++ b/Changes @@ -25,19 +25,20 @@ TODO: document -blr units, and possibly fix blur (20 seems to be about 3 pixels, TODO: when window partially off-screen, -blr does not have any effect anymore. TODO: rid of global dpy variable. 8. + - go with the times and expect x11 library files in /usr/lib, not + /usr/X11R6/lib. - initial transparency improvement/afterstep support patch by Sasha Vasko. - - nuke reconf script, serves no purpose anymore. - - do not process focus events caused by grabs - (patch by Mikachu). - - better option handling, support more than 30 options (exg). - add urgentOnBell resource to set the urgency hint (patch by Philip Paeps). + - do not process focus events caused by grabs + (patch by Mikachu). + - add iso14755_52 resource to disable iso14755 5.2. - add binding for backspace in iso14755 5.1 to remove the last digit. - - go with the times and expect x11 library files in /usr/lib, not - /usr/X11R6/lib. - - add iso14755_52 resource to disable iso14755 5.2. + - better option handling, support more than 30 options (exg). + - nuke reconf script, serves no purpose anymore. + - disabled matcher/on_user_command processing in matcher extension. 8.2 Sat Feb 17 21:35:28 CET 2007 - fix make depend in src/, reported by exg. diff --git a/src/perl/matcher b/src/perl/matcher index 81a83718..a440daf3 100644 --- a/src/perl/matcher +++ b/src/perl/matcher @@ -12,33 +12,33 @@ my $url = )+ }x; -sub on_user_command { - my ($self, $cmd) = @_; - if($cmd =~ s/^matcher\b//) { - $self->most_recent; - } - my $row = $self->nrow; - my @exec; - while($row-- > $self->top_row) { - #my $line = $self->line ($row); - #my $text = $line->t; - @exec = $self->command_for($row); - last if(@exec); - } - if(@exec) { - return $self->exec_async (@exec); - } - () -} - -sub most_recent { - my ($self) = shift; - () -} +#sub on_user_command { +# my ($self, $cmd) = @_; +# if($cmd =~ s/^matcher\b//) { +# $self->most_recent; +# } +# my $row = $self->nrow; +# my @exec; +# while($row-- > $self->top_row) { +# #my $line = $self->line ($row); +# #my $text = $line->t; +# @exec = $self->command_for($row); +# last if(@exec); +# } +# if(@exec) { +# return $self->exec_async (@exec); +# } +# () +#} +# +#sub most_recent { +# my ($self) = shift; +# () +#} sub my_resource { my $self = shift; - $self->x_resource("$self->{name}.$_[0]"); + $self->x_resource ("$self->{name}.$_[0]"); } # turn a rendition spec in the resource into a sub that implements it on $_