--- rxvt-unicode/src/rxvtperl.xs	2021/11/21 15:15:02	1.254
+++ rxvt-unicode/src/rxvtperl.xs	2021/11/21 23:00:48	1.255
@@ -531,7 +531,7 @@
 }
 
 bool
-rxvt_perl_interp::invoke (rxvt_term *term, hook_type htype, ...)
+rxvt_perl_interp::invoke (rxvt_term *term, int htype, ...)
 {
   if (!perl || !term->perl.self)
     return false;