From ce17faeb7bfe0844a6d7ab8e4d046cc674cf6f95 Mon Sep 17 00:00:00 2001 From: "B. Watson" Date: Sat, 10 Jan 2026 05:09:44 -0500 Subject: Fix broken updates, use 15.0 tree. --- bin/sbodb.pl | 2 ++ 1 file changed, 2 insertions(+) (limited to 'bin/sbodb.pl') 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 <