--- rxvt-unicode/src/perl/urxvt-popup	2006/01/19 17:37:01	1.14
+++ rxvt-unicode/src/perl/urxvt-popup	2007/12/24 08:21:40	1.15
@@ -108,6 +108,8 @@
 
    $self->resource (geometry => "${width}x${height}$pos");
 
+   $self->{term}{urxvt_popup_init_done} = 1;
+
    ()
 }