diff options
Diffstat (limited to 'bin/sbodb.pl')
| -rwxr-xr-x | bin/sbodb.pl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/bin/sbodb.pl b/bin/sbodb.pl index 06c8215..fc2d3ec 100755 --- a/bin/sbodb.pl +++ b/bin/sbodb.pl @@ -160,6 +160,7 @@ EOF open $tagstxt, "<" . $sbopath . "/TAGS.txt" or die $!; while(<$tagstxt>) { + my %seen; my ($build, $t, @tags); chomp; next if /: No tags found for/; @@ -167,6 +168,7 @@ while(<$tagstxt>) { @tags = split /,/, $t; for(@tags) { next if /^\s*$/; + next if $seen{$_}++; s/'/''/g; print <<EOF; insert into tags values($buildids{$build}, '$_'); |
