--- rxvt-unicode/src/rxvtperl.xs	2006/01/03 04:45:03	1.14
+++ rxvt-unicode/src/rxvtperl.xs	2006/01/03 18:11:34	1.17
@@ -369,6 +369,8 @@
       term->self = (void *)newSVptr ((void *)term, "urxvt::term");
       hv_store ((HV *)SvRV ((SV *)term->self), "_overlay", 8, newRV_noinc ((SV *)newHV ()), 0);
     }
+  else if (!term->self)
+    return false; // perl not initialized for this instance
   else if (htype == HOOK_DESTROY)
     {
       // handled later
@@ -844,7 +846,7 @@
 }
 
 int
-rxvt_term::selection_grab (int eventtime)
+rxvt_term::selection_grab (int eventtime = CurrentTime)
 
 void
 rxvt_term::selection (SV *newtext = 0)