diff options
Diffstat (limited to 'textproc')
| -rw-r--r-- | textproc/openfts/Makefile | 2 | ||||
| -rw-r--r-- | textproc/openfts/files/patch-Index.pm | 11 | ||||
| -rw-r--r-- | textproc/openfts/files/patch-PorterEng.pm | 11 |
3 files changed, 23 insertions, 1 deletions
diff --git a/textproc/openfts/Makefile b/textproc/openfts/Makefile index 515f9ff9f5f9..e476555a0eb7 100644 --- a/textproc/openfts/Makefile +++ b/textproc/openfts/Makefile @@ -7,10 +7,10 @@ PORTNAME= openfts PORTVERSION= 0.34 +PORTREVISION= 1 CATEGORIES= textproc perl5 MASTER_SITES= ${MASTER_SITE_SOURCEFORGE} MASTER_SITE_SUBDIR= openfts -PKGNAMEPREFIX= p5- DISTNAME= Search-OpenFTS-${PORTVERSION} MAINTAINER= kuriyama@FreeBSD.org diff --git a/textproc/openfts/files/patch-Index.pm b/textproc/openfts/files/patch-Index.pm new file mode 100644 index 000000000000..0148c7ea9c1a --- /dev/null +++ b/textproc/openfts/files/patch-Index.pm @@ -0,0 +1,11 @@ +--- OpenFTS/Index.pm.orig Wed Jul 24 02:15:37 2002 ++++ OpenFTS/Index.pm Tue Aug 19 20:28:53 2003 +@@ -201,7 +201,7 @@ + + foreach my $i ( 0..$#{$rv} ) { + my $param = $rv->[$i]{param}; +- if ( length $param ) { ++ if ( $param and length $param ) { + $rv->[$i]{param} = eval $param; + die "Can't eval '$param': $@" if $@; + } diff --git a/textproc/openfts/files/patch-PorterEng.pm b/textproc/openfts/files/patch-PorterEng.pm new file mode 100644 index 000000000000..1a461df17b9a --- /dev/null +++ b/textproc/openfts/files/patch-PorterEng.pm @@ -0,0 +1,11 @@ +--- OpenFTS/Dict/PorterEng.pm.orig Sat Apr 6 00:37:18 2002 ++++ OpenFTS/Dict/PorterEng.pm Tue Aug 19 20:54:05 2003 +@@ -186,7 +186,7 @@ + my $constname; + ($constname = $AUTOLOAD) =~ s/.*:://; + croak "& not defined" if $constname eq 'constant'; +- my $val = constant($constname, @_ ? $_[0] : 0); ++ my $val = constant($constname, (@_ and $_[0] =~ /^\d+$/) ? $_[0] : 0); + if ($! != 0) { + if ($! =~ /Invalid/) { + $AutoLoader::AUTOLOAD = $AUTOLOAD; |