update_sbtxt.pl: don't trip over any extra .info files (e.g. libretro).

1 files changed, 6 insertions, 1 deletions

diff --git a/update_sbtxt.pl b/update_sbtxt.pl
index 6abe285..9859935 100755
--- a/update_sbtxt.pl
+++ b/update_sbtxt.pl
@@ -13,6 +13,7 @@
 #####
 # Revision history:
 # 20240806, initial version, B. Watson.
+# 20260712, fixed issue with libretro extra .info files, B. Watson.
 #####
 
 #####
@@ -93,7 +94,11 @@ sub found_file {
 	# SlackBuild dir, if any, and the basename.
 	push @{$files{$dir}}, join("/", @path, $_);
 
-	return unless /(.*)\.info$/;
+	# 20260712 bkw: only look at the *correct* .info file. occasionally there
+	# will be some other file named <something>.info in the SlackBuild dir.
+	# libretro builds are notorious for this.
+	$prgnam = quotemeta($prgnam); # handle e.g. TiMidity++
+	return unless /^$prgnam\.info$/;
 
 	# if we found an .info file, add it to the list.
 	push @infos, "$dir/$_";