--- rxvt-unicode/src/command.C	2012/12/31 12:05:34	1.532
+++ rxvt-unicode/src/command.C	2013/02/01 11:26:40	1.533
@@ -1862,9 +1862,7 @@
                 update_background ();
               }
 #endif
-#if ENABLE_PERL
             HOOK_INVOKE ((this, HOOK_ROOTPMAP_CHANGE, DT_END));
-#endif
           }
 
         break;