]>
Commit | Line | Data |
---|---|---|
fcdb4745 | 1 | diff -Nur rxvt-unicode-9.18.orig/src/perl/tabbed rxvt-unicode-9.18/src/perl/tabbed |
2 | --- rxvt-unicode-9.18.orig/src/perl/tabbed 2013-02-17 00:41:38.000000000 +0000 | |
3 | +++ rxvt-unicode-9.18/src/perl/tabbed 2013-06-30 15:47:43.442909402 +0100 | |
4 | @@ -402,7 +402,7 @@ | |
5 | # simply proxies all interesting calls back to the tabbed class. | |
6 | ||
7 | { | |
8 | - for my $hook qw(start destroy key_press property_notify) { | |
9 | + for my $hook (qw(start destroy key_press property_notify)) { | |
10 | eval qq{ | |
11 | sub on_$hook { | |
12 | my \$parent = \$_[0]{term}{parent} |