diff options
author | Mathieu Arnold <mat@FreeBSD.org> | 2015-02-17 16:05:02 +0000 |
---|---|---|
committer | Mathieu Arnold <mat@FreeBSD.org> | 2015-02-17 16:05:02 +0000 |
commit | 4a3f1a86d7dd247f43a1e013c9a0e34a2ccadd8b (patch) | |
tree | 3c111a6e16b37eede4589a873371817dbb55c8ae /print/p5-PostScript/files/patch-TextBlock.pm | |
parent | Update to 0.001007. (diff) |
Fix with perl 5.20+.
Sponsored by: Absolight
Notes
Notes:
svn path=/head/; revision=379172
Diffstat (limited to 'print/p5-PostScript/files/patch-TextBlock.pm')
-rw-r--r-- | print/p5-PostScript/files/patch-TextBlock.pm | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/print/p5-PostScript/files/patch-TextBlock.pm b/print/p5-PostScript/files/patch-TextBlock.pm new file mode 100644 index 000000000000..0c4edd6d175e --- /dev/null +++ b/print/p5-PostScript/files/patch-TextBlock.pm @@ -0,0 +1,11 @@ +--- TextBlock.pm.orig 1999-08-11 14:04:36 UTC ++++ TextBlock.pm +@@ -54,7 +54,7 @@ sub numElements { + # Returns the number of elements in the TextBlock + # + my $self = shift; +- return $#{@$self}+1; ++ return scalar(@$self); + } + + sub Write { |