*** empty log message ***

diff --git a/Changes b/Changes
index 9b3cac78a62223e933963a1953b90b962fa1c608..d9c9b61a7b75d74bc3ca28d83086ce96140b35be 100644 (file)
--- a/Changes
+++ b/Changes
@@ -18,6 +18,8 @@ WISH: http://www120.pair.com/mccarthy/nextstep/intro.htmld/Workspace.html is the
 DUMB: support tex fonts
 
        - add FORCE_UNBUFFERED_XFT define to features.h.
+       - moved on_osc_seq to on_osc_seq_perl and added a more
+          generic osc_seq.
 
 7.7  Tue Feb 21 12:32:49 CET 2006
        - use double-buffered drawing (xft fonts only). On many driver/hardware

diff --git a/src/command.C b/src/command.C
index 226579bb75bc25597481342903a74dfc0b98ef64..14f6bbf203927fbb826612a71908c40e76667988 100644 (file)
--- a/src/command.C
+++ b/src/command.C
@@ -3758,6 +3758,10 @@ rxvt_term::process_xterm_seq (int op, const char *str, char resp)
   dLocal (Display *, dpy);
 
   assert (str != NULL);
+  
+  if (HOOK_INVOKE ((this, HOOK_OSC_SEQ, DT_INT, op, DT_STR, str, DT_END)))
+    ; // no responses yet
+
   switch (op)
     {
       case XTerm_name:
@@ -3984,7 +3988,7 @@ rxvt_term::process_xterm_seq (int op, const char *str, char resp)
 
 #if ENABLE_PERL
       case URxvt_perl:
-        if (HOOK_INVOKE ((this, HOOK_OSC_SEQ, DT_STR, str, DT_END)))
+        if (HOOK_INVOKE ((this, HOOK_OSC_SEQ_PERL, DT_STR, str, DT_END)))
           ; // no responses yet
         break;
 #endif

diff --git a/src/hookinc.h b/src/hookinc.h
index ae8815a4ea0bc578d3906ca9f01093f9e3cbf2da..603ebe77e1fd70696f1d7658eb5f9a901a8b4982 100644 (file)
--- a/src/hookinc.h
+++ b/src/hookinc.h
@@ -19,6 +19,7 @@
   def (LINE_UPDATE)
   def (ADD_LINES)
   def (OSC_SEQ)
+  def (OSC_SEQ_PERL)
   def (TT_WRITE)
 
   def (REFRESH_BEGIN)

diff --git a/src/urxvt.pm b/src/urxvt.pm
index 65d95cc4483e835fbdb1cac89003d7ba6f5f0bbb..4b6ceff26d8f50a0efabea70a132906909aa726a 100644 (file)
--- a/src/urxvt.pm
+++ b/src/urxvt.pm
@@ -495,7 +495,17 @@ It is called before lines are scrolled out (so rows 0 .. min ($lines - 1,
 $nrow - 1) represent the lines to be scrolled out). C<$saved> is the total
 number of lines that will be in the scrollback buffer.
 
-=item on_osc_seq $term, $string
+=item on_osc_seq $term, $op, $args
+
+Called on every OSC sequence and can be used to suppress it or modify its
+behaviour.  The default should be to return an empty list. A true value
+suppresses execution of the request completely. Make sure you don't get
+confused by recursive invocations when you output an osc sequence within
+this callback.
+
+C<on_osc_seq_perl> should be used for new behaviour.
+
+=item on_osc_seq_perl $term, $string
 
 Called whenever the B<ESC ] 777 ; string ST> command sequence (OSC =
 operating system command) is processed. Cursor position and other state