-- Leo's gemini proxy
-- Connecting to git.thebackupbox.net:1965...
-- Connected
-- Sending request
-- Meta line: 20 text/gemini
repo: rxvt-unicode-sixel action: commit revision: path_from: revision_from: 4770cf34df3b12d4361052032174039715c99d15: path_to: revision_to:
commit 4770cf34df3b12d4361052032174039715c99d15 Author: Marc Lehmann <schmorp@schmorp.de> Date: Sun Jan 8 00:41:20 2006 +0000 *** empty log message *** diff --git a/src/perl/option-popup b/src/perl/option-popup
--- a/src/perl/option-popup +++ b/src/perl/option-popup @@ -9,7 +9,7 @@ sub on_button_press { my %unsafe = map +($_ => 1), qw(borderLess console iconic loginShell reverseVideo scrollBar scrollBar_floating scrollBar_right - secondaryScreen transparent utmpInhibit); + secondaryScreen transparent utmpInhibit meta8); for my $name (sort keys %urxvt::OPTION) { next if $unsafe{$name}; diff --git a/src/perl/urxvt-popup b/src/perl/urxvt-popup
--- a/src/perl/urxvt-popup +++ b/src/perl/urxvt-popup @@ -29,7 +29,13 @@ sub refresh { sub on_motion_notify { my ($self, $event) = @_; - $self->{hover} = $event->{row} + 1; + delete $self->{hover}; + + my ($row, $col) = ($event->{row}, $event->{col}); + if ($col >= 0 && $col < $self->ncol + && $row >= 0 && $row < @{ $self->{data}{item} }) { + $self->{hover} = $event->{row} + 1; + } $self->refresh; 1 @@ -47,9 +53,6 @@ sub on_button_press { sub on_button_release { my ($self, $event) = @_; - my $row = $event->{row}; - my $col = $event->{col}; - if ($event->{button} == $self->{data}{event}{button}) { $self->ungrab; $self->destroy; @@ -57,6 +60,7 @@ sub on_button_release { $self->{press}[$event->{button}] = 0; + my ($row, $col) = ($event->{row}, $event->{col}); if ($col >= 0 && $col < $self->ncol && $row >= 0 && $row < @{ $self->{data}{item} }) { $self->{data}{item}[$row]{activate}->($event);
-----END OF PAGE-----
-- Response ended
-- Page fetched on Sun Jun 2 11:27:11 2024