aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'src/ekeyword/ekeyword')
-rwxr-xr-xsrc/ekeyword/ekeyword13
1 files changed, 13 insertions, 0 deletions
diff --git a/src/ekeyword/ekeyword b/src/ekeyword/ekeyword
index 9528911..1ac0403 100755
--- a/src/ekeyword/ekeyword
+++ b/src/ekeyword/ekeyword
@@ -112,6 +112,12 @@ for my $f (@ARGV) {
open O, ">$f.new" or die "Can't create $f.new: $!\n";
select O;
+ my $count = 0;
+ while(<I>) {
+ $count++ if m/^\s*KEYWORDS=/;
+ }
+ seek(I, 0, 0);
+
while (<I>) {
if (/^\s*KEYWORDS=/) {
@@ -123,6 +129,13 @@ for my $f (@ARGV) {
}
(my $quoted = $_) =~ s/^.*?["'](.*?)["'].*/$1/s;
+ if($count > 1 && length($quoted) eq 0) {
+ # Skip empty KEYWORDS variables in case they occur more than
+ # once, bug 321475.
+ print $_;
+ next;
+ }
+
# replace -* with -STAR for our convenience below
$quoted =~ s/-\*/-STAR/;