From c7daeada10962635b104f76576bafe674e5b54f5 Mon Sep 17 00:00:00 2001
From: "B. Watson" <urchlay@slackware.uk>
Date: Sat, 10 Jan 2026 05:10:35 -0500
Subject: Localize variable properly.

---
 bin/sbodb.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'bin/sbodb.pl')

diff --git a/bin/sbodb.pl b/bin/sbodb.pl
index fc2d3ec..3e4bc98 100755
--- a/bin/sbodb.pl
+++ b/bin/sbodb.pl
@@ -160,13 +160,13 @@ EOF
 
 open $tagstxt, "<" . $sbopath . "/TAGS.txt" or die $!;
 while(<$tagstxt>) {
-	my %seen;
 	my ($build, $t, @tags);
 	chomp;
 	next if /: No tags found for/;
 	($build, $t) = /^([^:]*):\s+(.*)$/;
 	@tags = split /,/, $t;
 	for(@tags) {
+		my %seen;
 		next if /^\s*$/;
 		next if $seen{$_}++;
 		s/'/''/g;
-- 
cgit v1.2.3