repo: rxvt-unicode-sixel
action: commit
revision: 
path_from: 
revision_from: 9981a74c2df1595017f184fdbf45244858c09782:
path_to: 
revision_to: 

commit 9981a74c2df1595017f184fdbf45244858c09782
Author: Marc Lehmann 
Date:   Sat May 25 23:14:08 2013 +0000

    *** empty log message ***

diff --git a/Changes b/Changes

--- a/Changes
+++ b/Changes
@@ -34,6 +34,8 @@ TODO IMPL: sensitive focussed? function for perl bg expr
 TODO IMPL: colour-change event with index
 TODO IMPL: recalc bg always on bg colour change
 TODO IMPL: recalc bg only when not fully covering (no alpha, repeat|extend etc..)
+   	- work around perl 5.18.0 breakage in tabbed extension
+          (reported by Karol Blazewicz).
 	- fix regression that caused the double-click word selection to
 	  erroneously include a tab on the left of the selected word.
 	- add support for the set cursor style (DECSCUSR) control
diff --git a/src/perl/tabbed b/src/perl/tabbed

--- a/src/perl/tabbed
+++ b/src/perl/tabbed
@@ -402,7 +402,7 @@ package urxvt::ext::tabbed::tab;
 # simply proxies all interesting calls back to the tabbed class.

 {
-   for my $hook qw(start destroy key_press property_notify) {
+   for my $hook (qw(start destroy key_press property_notify)) {
       eval qq{
          sub on_$hook {
             my \$parent = \$_[0]{term}{parent}

-----END OF PAGE-----