summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--japanese/tiarra/Makefile2
-rw-r--r--japanese/tiarra/files/patch-main__Configuration__Block.pm13
-rw-r--r--japanese/tiarra/files/patch-main__Configuration__Preprocessor.pm13
-rw-r--r--japanese/tiarra/files/patch-main__Tiarra__Utils__DefineHelper.pm16
4 files changed, 43 insertions, 1 deletions
diff --git a/japanese/tiarra/Makefile b/japanese/tiarra/Makefile
index d81fa78..b105d15 100644
--- a/japanese/tiarra/Makefile
+++ b/japanese/tiarra/Makefile
@@ -3,7 +3,7 @@
PORTNAME= tiarra
PORTVERSION= 20100212
-PORTREVISION= 6
+PORTREVISION= 7
CATEGORIES= japanese irc ipv6
MASTER_SITES= http://www.clovery.jp/tiarra/archive/2010/02/
diff --git a/japanese/tiarra/files/patch-main__Configuration__Block.pm b/japanese/tiarra/files/patch-main__Configuration__Block.pm
new file mode 100644
index 0000000..7d1d472
--- /dev/null
+++ b/japanese/tiarra/files/patch-main__Configuration__Block.pm
@@ -0,0 +1,13 @@
+Index: main/Configuration/Block.pm
+diff -u main/Configuration/Block.pm.orig main/Configuration/Block.pm
+--- main/Configuration/Block.pm.orig 2010-02-12 03:34:30.000000000 +0900
++++ main/Configuration/Block.pm 2015-09-01 16:49:33.521015928 +0900
+@@ -140,7 +140,7 @@
+ }
+ $result;
+ };
+- (my $evaluated = $str) =~ s/\%CODE{(.*?)}EDOC\%/$eval->($1)/eg;
++ (my $evaluated = $str) =~ s/\%CODE\{(.*?)}EDOC\%/$eval->($1)/eg;
+ $evaluated;
+ }
+
diff --git a/japanese/tiarra/files/patch-main__Configuration__Preprocessor.pm b/japanese/tiarra/files/patch-main__Configuration__Preprocessor.pm
new file mode 100644
index 0000000..c024921
--- /dev/null
+++ b/japanese/tiarra/files/patch-main__Configuration__Preprocessor.pm
@@ -0,0 +1,13 @@
+Index: main/Configuration/Preprocessor.pm
+diff -u main/Configuration/Preprocessor.pm.orig main/Configuration/Preprocessor.pm
+--- main/Configuration/Preprocessor.pm.orig 2010-02-12 03:34:30.000000000 +0900
++++ main/Configuration/Preprocessor.pm 2015-09-01 16:49:03.358017196 +0900
+@@ -165,7 +165,7 @@
+ }
+ defined $result ? $result : '';
+ };
+- $body =~ s/\%PRE{(.+?)}ERP\%/$evaluate->($1)/seg;
++ $body =~ s/\%PRE\{(.+?)}ERP\%/$evaluate->($1)/seg;
+ $body;
+ }
+
diff --git a/japanese/tiarra/files/patch-main__Tiarra__Utils__DefineHelper.pm b/japanese/tiarra/files/patch-main__Tiarra__Utils__DefineHelper.pm
new file mode 100644
index 0000000..bf01482
--- /dev/null
+++ b/japanese/tiarra/files/patch-main__Tiarra__Utils__DefineHelper.pm
@@ -0,0 +1,16 @@
+Index: main/Tiarra/Utils/DefineHelper.pm
+diff -u main/Tiarra/Utils/DefineHelper.pm.orig main/Tiarra/Utils/DefineHelper.pm
+--- main/Tiarra/Utils/DefineHelper.pm.orig 2010-02-12 03:34:30.000000000 +0900
++++ main/Tiarra/Utils/DefineHelper.pm 2015-09-02 01:20:26.908910808 +0900
+@@ -345,9 +345,10 @@
+ } else {
+ @funcnames = $_;
+ }
++ my $j = $i;
+ $pkg->define_function(
+ $pkg->get_package,
+- sub () { $i; },
++ sub () { $j; },
+ @funcnames);
+ ++$i;
+ }
OpenPOWER on IntegriCloud