--- rxvt-unicode/src/rxvtperl.h	2006/01/08 08:43:11	1.14
+++ rxvt-unicode/src/rxvtperl.h	2006/01/12 01:30:53	1.16
@@ -36,12 +36,14 @@
 
 struct rxvt_perl_interp
 {
+  char **perl_environ;
+
   rxvt_perl_interp ();
   ~rxvt_perl_interp ();
 
   bool should_invoke[HOOK_NUM];
 
-  void init (bool tainted);
+  void init ();
   bool invoke (rxvt_term *term, hook_type htype, ...);
   void line_update (rxvt_term *term);
 };