1 |
Author: fuzzyray |
2 |
Date: 2009-04-25 04:16:20 +0000 (Sat, 25 Apr 2009) |
3 |
New Revision: 550 |
4 |
|
5 |
Modified: |
6 |
trunk/src/ekeyword/ekeyword |
7 |
Log: |
8 |
Fix bug with multiline KEYWORDS processing |
9 |
|
10 |
Modified: trunk/src/ekeyword/ekeyword |
11 |
=================================================================== |
12 |
--- trunk/src/ekeyword/ekeyword 2009-04-24 16:37:09 UTC (rev 549) |
13 |
+++ trunk/src/ekeyword/ekeyword 2009-04-25 04:16:20 UTC (rev 550) |
14 |
@@ -47,7 +47,7 @@ |
15 |
while (not /^KEYWORDS=["'].*?["']/) { |
16 |
chomp; |
17 |
my $next = <I>; |
18 |
- $_ = join "", $_, $next; |
19 |
+ $_ = join " ", $_, $next; |
20 |
} |
21 |
(my $quoted = $_) =~ s/^.*?["'](.*?)["'].*/$1/s; |