*** empty log message ***
authorroot <root>
Mon, 16 Jan 2006 08:29:57 +0000 (08:29 +0000)
committerroot <root>
Mon, 16 Jan 2006 08:29:57 +0000 (08:29 +0000)
src/command.C
src/main.C
src/rxvt.h
src/rxvtperl.h

index 75882ce088b3619e77c714c9c76424327456ef05..8b7111011f91a3b7d0fb15cca1f0680291858c5d 100644 (file)
@@ -1308,6 +1308,7 @@ rxvt_term::x_cb (XEvent &ev)
   dDisp;
 
   if (ev.xany.window == vt
+      && SHOULD_INVOKE (HOOK_X_EVENT)
       && HOOK_INVOKE ((this, HOOK_X_EVENT, DT_XEVENT, &ev, DT_END)))
     return;
 
@@ -1617,7 +1618,8 @@ rxvt_term::x_cb (XEvent &ev)
 
         if (ev.xany.window == vt)
           {
-            if (HOOK_INVOKE ((this, HOOK_MOTION_NOTIFY, DT_XEVENT, &ev, DT_END)))
+            if (SHOULD_INVOKE (HOOK_MOTION_NOTIFY)
+                && HOOK_INVOKE ((this, HOOK_MOTION_NOTIFY, DT_XEVENT, &ev, DT_END)))
               ; // nop
             else if (ev.xbutton.state & (Button1Mask | Button3Mask))
               {
index ae3210b35427b1dc7302976de87f92033258bc48..233c50910709827fb303c613d252b9848ec09541 100644 (file)
@@ -91,14 +91,6 @@ rxvt_pop_locale ()
   rxvt_set_locale (savelocale);
 }
 
-void
-rxvt_term::make_current () const
-{
-  SET_R (this);
-  rxvt_set_locale (locale);
-  set_environ (envv);
-}
-
 #if ENABLE_COMBINING
 class rxvt_composite_vec rxvt_composite;
 
index bf7b4994ac58a1d5cd45f83f7f4df9748c5fff17..5bd6073d26fd08faf34ba30805e8cde650f27a6d 100644 (file)
@@ -1286,7 +1286,12 @@ struct rxvt_term : zero_initialized, rxvt_vars {
 
   bool pty_fill ();
 
-  void make_current () const; // make this the "currently active" urxvt instance
+  void make_current () const // make this the "currently active" urxvt instance
+  {
+    SET_R (this);
+    rxvt_set_locale (locale);
+    set_environ (envv);
+  }
 
   void init_secondary ();
   const char **init_resources (int argc, const char *const *argv);
index a180ce36401d557f5a16e799e55411367545e51c..11f57ef35aa4a5c76a35dbfc776870fb4c119eaf 100644 (file)
@@ -6,18 +6,23 @@
 #define RXVTPERL_H_
 
 #if ENABLE_PERL
-# define SHOULD_INVOKE(htype) perl.should_invoke [htype]
+# define SHOULD_INVOKE(htype) \
+    (  (htype) == HOOK_INIT            \
+    || (htype) == HOOK_DESTROY         \
+    || (htype) == HOOK_REFRESH_BEGIN   \
+    || (htype) == HOOK_REFRESH_END     \
+    || perl.should_invoke [htype])
 # define HOOK_INVOKE(args) rxvt_perl.invoke args
 
 #include "rxvt.h"
 
 enum data_type {
-  DT_END,
+  DT_END,     // no further arguments
   DT_INT,
   DT_LONG,
-  DT_STR,
-  DT_STR_LEN,
-  DT_WCS_LEN,
+  DT_STR,     // 0-terminates string
+  DT_STR_LEN, // string + length
+  DT_WCS_LEN, // wstring + length
   DT_XEVENT,
 };