X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=blobdiff_plain;f=bugreport;h=34ddb6e4643a9b463046ef35e5852d3f956644ba;hp=ff1b0c77c0cfc40ca966b43dc589b9b9e166f6fb;hb=b6929df21306bcb09f3ac4592d116bcdc97f09b3;hpb=5b1d396f8f09c314859583a8f8b96876e043f2cd

diff --git a/bugreport b/bugreport
index ff1b0c7..34ddb6e 100755
--- a/bugreport
+++ b/bugreport
@@ -4,8 +4,10 @@
 # Generate a report of the release-critical bugs for packages
 
 use Getopt::Std;
-require scanlib;
-require bugcfg;
+use File::Basename;
+use lib dirname(__FILE__);
+use bugcfg;
+use scanlib;
 use strict;
 use warnings;
 
@@ -127,7 +129,7 @@ sub MakeBuglist() {
 }
 
 
-sub MakeStatistics() {
+sub MakeStatistics {
 	my $bugcount=0;		# Total number of bugs so far
 	my $patchtotal=0;	# Total number of bugs marked patch
 	my $pendingtotal=0;	# Total number of bugs marked pending
@@ -210,7 +212,7 @@ FilterPackages($opt_d) if ($opt_d);
 FilterBugsStable() if ($opt_b);
 FilterBugs() if ($opt_t);
 
-MakeStatistics if ($opt_s);
+MakeStatistics() if ($opt_s);
 if ($opt_l) {
 	MakeBuglist();
 }