Fix bug with multiline KEYWORDS processing
authorfuzzyray <fuzzyray@gentoo.org>
Sat, 25 Apr 2009 04:16:20 +0000 (04:16 -0000)
committerfuzzyray <fuzzyray@gentoo.org>
Sat, 25 Apr 2009 04:16:20 +0000 (04:16 -0000)
svn path=/; revision=550

trunk/src/ekeyword/ekeyword

index dd6a573df3062e26bebb89aac02f72127a32301b..2e49ac0bbfe1954a2a7728c0747e432d50667992 100755 (executable)
@@ -47,7 +47,7 @@ for my $f (@ARGV) {
                        while (not /^KEYWORDS=["'].*?["']/) {
                                chomp;
                                my $next = <I>;
-                               $_ = join "", $_, $next;
+                               $_ = join " ", $_, $next;
                        }
                        (my $quoted = $_) =~ s/^.*?["'](.*?)["'].*/$1/s;