X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=bugscan;h=e4cdfd3468a57b088f31cf2430e4edabfb8948db;hp=69b42e31c91c6c3dddf1ac8a7f4013952a3d8e48;hb=869d53dd359f46ca15f99fca7f76c8af164f0ff9;hpb=c254a0d0c6ce35fab30d43d9e4e7e3015e250013

diff --git a/bugscan b/bugscan
index 69b42e3..e4cdfd3 100755
--- a/bugscan
+++ b/bugscan
@@ -17,17 +17,21 @@ scanlib::readpseudopackages();
 scanlib::readmaintainers();
 scanlib::scanspool();
 
+binmode(STDOUT,':encoding(UTF-8)');
+
 for my $p (keys %scanlib::packagelist) {
 	my $section;
-	if (exists $scanlib::section{$p}) {
-	    $section = $scanlib::section{$p};
+	my $package = $p;
+	$package =~ s/src://;
+	if (exists $scanlib::section{$package}) {
+	    $section = $scanlib::section{$package};
 	} else {
-	    $section = $scanlib::debbugssection{$p};
+	    $section = $scanlib::debbugssection{$package};
 	}
 	print "package\n";
 	print $p, "\n";
 	print $section, "\n";
-	print $scanlib::maintainer{$p}, "\n";
+	print $scanlib::maintainer{$package}, "\n";
 	print "\n";
 }