Attachment 5416 Details for Bug 14098 – patch for Text::Wrap 2012.0818

[patch] patch for Text::Wrap 2012.0818

file_14098.txt (text/plain), 660 bytes, created by Frédéric "LpSolit" Buclin on 2014-09-15 18:35:40 CEST

(hide)

Description:

Filename:

MIME Type:

Creator: Frédéric "LpSolit" Buclin

Created: 2014-09-15 18:35:40 CEST

Size: 660 bytes

patch

obsolete

--- /usr/lib/perl5/5.18.1/Text/Wrap.pm 2014-09-15 18:24:50.434111587 +0200
+++ /usr/lib/perl5/5.18.1/Text/Wrap.pm 2014-09-15 18:31:06.735750457 +0200
@@ -64,7 +64,7 @@ sub wrap
                                ? unexpand($nl . $lead . $1)
                                : $nl . $lead . $1;
                        $remainder = $2;
-               } elsif ($huge eq 'wrap' && $t =~ /\G((?:(?!=[^\n])\X){$ll})/gc) {
+               } elsif ($huge eq 'wrap' && $t =~ /\G((?:(?=[^\n])\X){$ll})/gc) {
                        $r .= $unexpand
                                ? unexpand($nl . $lead . $1)
                                : $nl . $lead . $1;

Actions: View | Diff

Attachments on bug 14098: 5416