--- rxvt-unicode/src/perl/urxvt-popup	2006/01/19 17:37:01	1.14
+++ rxvt-unicode/src/perl/urxvt-popup	2012/06/11 05:03:46	1.17
@@ -1,7 +1,7 @@
 #! perl
 
 # this extension implements popup-menu functionality for urxvt. it works
-# together with the urxvt::popup class.
+# together with the urxvt::popup class - "no user serviceable parts inside".
 
 sub refresh {
    my ($self) = @_;
@@ -108,6 +108,8 @@
 
    $self->resource (geometry => "${width}x${height}$pos");
 
+   $self->{term}{urxvt_popup_init_done} = 1;
+
    ()
 }