*** empty log message ***

diff --git a/src/perl/urxvt-popup b/src/perl/urxvt-popup
index 8e7a042..3d90d40 100644 (file)
--- 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 8637989..7b29d10 100644 (file)
--- 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";
 }