Fix regex, thanks to Magnus Granberg (zorry) <zorry@ume.nu>.

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

diff --git a/ChangeLog b/ChangeLog
index ae82ce4d63b6c8d275bb9326a44e70446f08e094..4ed50e11ba8a87982a50bc6e146af0f0b3113166 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,6 @@
+2009-09-06: Christian Ruppert <idl0r@gentoo.org>
+       * src/echangelog/echangelog: Fix regex, thanks to Magnus Granberg (zorry) <zorry@ume.nu>.
+
 2009-07-20: Christian Ruppert <idl0r@gentoo.org>
        * README.Developer, README: Some clean-up.
        * Makefile, Makefile.skel, makedefs.mak: Some minor improvements. Fix

diff --git a/src/echangelog/echangelog b/src/echangelog/echangelog
index bee728c0025e82671255c4e14079e357a57639ce..54687329962d9e54de5ae3da11c8788da38e699f 100755 (executable)
--- a/src/echangelog/echangelog
+++ b/src/echangelog/echangelog
@@ -325,7 +325,7 @@ while (<C>) {
                        if (defined($prefix)) {
                                chomp($prefix);
 
-                               if ($filename =~ /$prefix(\S*)/) {
+                               if ($filename =~ /\Q$prefix\E(\S*)/) {
                                        $filename = $1 ;
                                }
                                else {