diff options
Diffstat (limited to 'sbolint')
| -rwxr-xr-x | sbolint | 9 |
1 files changed, 6 insertions, 3 deletions
@@ -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!"); } } |
