src/echangelog/echangelog: Fix replacement regex for TextWrap, thanks to Torsten...

svn path=/trunk/gentoolkit-dev/; revision=741

diff --git a/ChangeLog b/ChangeLog
index cfe5d03de5eff0917c57e75962b2c4fc7af796c1..8c289096c380217954080b8668f1ed9b17b8314c 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2010-02-10: Christian Ruppert <idl0r@gentoo.org>
+       src/echangelog/echangelog: Fix replacement regex for TextWrap, thanks to
+       Torsten Veller <tove@gentoo.org>, bug 304249.
+
 2010-02-02: Christian Ruppert <idl0r@gentoo.org>
        src/echangelog/echangelog: Add --vcs switch to specify the vcs without
                autodetection as requested per bug 302784, thanks to Martin von Gagern

diff --git a/src/echangelog/echangelog b/src/echangelog/echangelog
index 820614bcc4e908d9ccc242fb412ee1eb869d9b6b..b414b1fc6c35c1ccd8dda5338e23019a1d3b4b08 100755 (executable)
--- a/src/echangelog/echangelog
+++ b/src/echangelog/echangelog
@@ -136,7 +136,7 @@ sub text_fill {
        my $pp;
 
        for $pp ( split(/\n\s+/, join("\n", @raw)) ) {
-               $pp =~ s/[\x09|\x0B|\x0C|\x20]+/ /g;
+               $pp =~ s/[\x09\x0B\x0C\x20]+/ /g;
                my $x = Text::Wrap::wrap($ip, $xp, $pp);
                push(@para, $x);
        }