- Update to 1.10

- Add LICENSE
- Strip shared library
- Rename patch file to avoid EXTRA_PATCHES
- Sort PLIST

Changes:	http://search.cpan.org/dist/Text-Reflow/Changes

1 files changed, 63 insertions, 0 deletions

diff --git a/textproc/p5-Text-Reflow/files/patch-Reflow.pm b/textproc/p5-Text-Reflow/files/patch-Reflow.pm
new file mode 100644
index 000000000000..08332e5bb54b
--- /dev/null
+++ b/textproc/p5-Text-Reflow/files/patch-Reflow.pm
@@ -0,0 +1,63 @@
+--- Reflow.pm.orig	2009-02-07 14:24:01.000000000 +0000
++++ Reflow.pm	2009-02-12 16:47:20.000000000 +0000
+@@ -32,7 +32,7 @@
+ 
+ $Text::Reflow::VERSION = "1.06";
+ 
+-bootstrap Text::Reflow $Text::Reflow::VERSION;
++#bootstrap Text::Reflow $Text::Reflow::VERSION;
+ 
+ # Preloaded methods go here.
+ 
+@@ -41,17 +41,17 @@
+ # bootstrap Text::Reflow $VERSION;
+ # above, and take the _ from the front of this perl version:
+ 
+-sub _reflow_trial($$$$$$$$$$) {
++sub reflow_trial($$$$$$$$$$) {
+   my ($optimum, $maximum, $wordcount,
+       $penaltylimit, $semantic, $shortlast,
+       $word_len, $space_len, $extra, $result) = @_;
+   my ($lastbreak, @linkbreak);
+   my ($j, $k, $interval, $penalty, @totalpenalty, $bestsofar);
+   my (@best_linkbreak, $best_lastbreak, $opt);
+-  my @optimum	= unpack("N*", pack("H*", $optimum));
+-  my @word_len	= unpack("N*", pack("H*", $word_len));
+-  my @space_len	= unpack("N*", pack("H*", $space_len));
+-  my @extra	= unpack("N*", pack("H*", $extra));
++  my @optimum	= unpack("j*", pack("H*", $optimum));
++  my @word_len	= unpack("j*", pack("H*", $word_len));
++  my @space_len	= unpack("j*", pack("H*", $space_len));
++  my @extra	= unpack("j*", pack("H*", $extra));
+   my $best = $penaltylimit * 21;
+   foreach $opt (@optimum) {
+     @linkbreak = ();
+@@ -101,7 +101,7 @@
+     }
+   } # Next $opt
+   # Return the best breaks:
+-  $result = unpack("H*", pack("N*", ($best_lastbreak, @best_linkbreak)));
++  $result = unpack("H*", pack("j*", ($best_lastbreak, @best_linkbreak)));
+   return($result);
+ }
+ 
+@@ -511,14 +511,14 @@
+   $linkbreak[$wordcount] = 0;
+   # Create space for the result:
+   my $result = " " x (($wordcount + 2) * 8);
+-  $result = reflow_trial(unpack("H*", pack("N*", @$optimum)),
++  $result = reflow_trial(unpack("H*", pack("j*", @$optimum)),
+ 			 $maximum, $wordcount,
+ 			 $penaltylimit, $semantic, $shortlast,
+-			 unpack("H*", pack("N*", @word_len)),
+-			 unpack("H*", pack("N*", @space_len)),
+-			 unpack("H*", pack("N*", @extra)),
++			 unpack("H*", pack("j*", @word_len)),
++			 unpack("H*", pack("j*", @space_len)),
++			 unpack("H*", pack("j*", @extra)),
+ 			 $result);
+-  @linkbreak = unpack("N*", pack("H*", $result));
++  @linkbreak = unpack("j*", pack("H*", $result));
+   # Convert @linkbreak from unsigned to signed:
+   @linkbreak = map { $_ > 0xF0000000 ? -((0xFFFFFFFF - $_) + 1) : $_ + 0 } @linkbreak;
+   $lastbreak = shift(@linkbreak);