repo: rxvt-unicode-sixel
action: commit
revision: 
path_from: 
revision_from: 8f40a50df0f4d560ced52a889865d83882507887:
path_to: 
revision_to: 
git.thebackupbox.net
rxvt-unicode-sixel
git clone git://git.thebackupbox.net/rxvt-unicode-sixel
commit 8f40a50df0f4d560ced52a889865d83882507887
Author: Marc Lehmann 
Date:   Sat Jan 7 20:29:28 2006 +0000

    *** empty log message ***

diff --git a/src/perl/urxvt-popup b/src/perl/urxvt-popup
index 8e7a042408e5d62f7df8535bc0ada73a0bd59d7c..
index ..3d90d405e46942cad26db6f3d0c8f92e8a04d9c3 100644
--- a/src/perl/urxvt-popup
+++ b/src/perl/urxvt-popup
@@ -1,5 +1,8 @@
 #! perl

+# this extension implements popup-menu functionality for urxvt. it works
+# together with the urxvt::popup class.
+
 use List::Util;

 sub refresh {
diff --git a/src/urxvt.pm b/src/urxvt.pm
index 8637989232495ebef71fad139ccb7b95a40e87d2..
index ..7b29d10cb404ff5f19bca52584b14818a41cf3ec 100644
--- a/src/urxvt.pm
+++ b/src/urxvt.pm
@@ -995,7 +995,7 @@ sub show {

    urxvt->new ("--perl-lib" => "", "--perl-ext-common" => "", "-pty-fd" => -1, "-sl" => 0, "-b" => 0,
                "--transient-for" => $self->{term}->parent,
-               "-pe" => "urxvt_popup")
+               "-pe" => "urxvt-popup")
       or die "unable to create popup window\n";
 }

-----END OF PAGE-----