From 4547dbc29f377fdba7aec35ab04a68ca0a033a67 Mon Sep 17 00:00:00 2001
From: "B. Watson" <urchlay@slackware.uk>
Date: Sun, 16 Aug 2026 02:41:30 -0400
Subject: sbolint: make pkglist check case-insensitive.

---
 sbolint | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

diff --git a/sbolint b/sbolint
index 0f2c5e5..6416c9e 100755
--- a/sbolint
+++ b/sbolint
@@ -2116,13 +2116,16 @@ sub load_package_list {
 	open my $fh, "<", $file or die "$SELF: $file: $!";
 	while(<$fh>) {
 		chomp;
-		$pkglist{$_}++;
+		$pkglist{lc $_}++;
 	}
 	close $fh;
 
 	## warn "pkglist.txt loaded, " . (keys %pkglist) . " packages\n";
 }
 
+# logs an error if pkglist.txt has the same package name. note that this is
+# case-insensitive, so if someone tries to submit "mplayer", Slackware's
+# "MPlayer" will match.
 sub check_package_list {
 	if(!$pkglist_tried) {
 		load_package_list;
@@ -2131,8 +2134,8 @@ sub check_package_list {
 
 	return unless %pkglist;
 
-	if($pkglist{$buildname}) {
-		log_error("$buildname is a core Slackware package!");
+	if($pkglist{lc $buildname}) {
+		log_error("$buildname is already in core Slackware!");
 	}
 }
 
-- 
cgit v1.2.3