[packages/urxvt.git] / urxvt-tabbed_syntax.patch

diff -Nur rxvt-unicode-9.18.orig/src/perl/tabbed rxvt-unicode-9.18/src/perl/tabbed
--- rxvt-unicode-9.18.orig/src/perl/tabbed	2013-02-17 00:41:38.000000000 +0000
+++ rxvt-unicode-9.18/src/perl/tabbed	2013-06-30 15:47:43.442909402 +0100
@@ -402,7 +402,7 @@
 # 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}
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}