wwwnumber and wwwname take arguments; () is wrong.
authorDon Armstrong <don@donarmstrong.com>
Thu, 10 Aug 2017 00:57:26 +0000 (17:57 -0700)
committerDon Armstrong <don@donarmstrong.com>
Thu, 10 Aug 2017 00:57:26 +0000 (17:57 -0700)
scanlib.pm

index 47f8baf..19fda96 100644 (file)
@@ -312,14 +312,14 @@ sub htmlsanit {
     return $in;
 }
 
-sub wwwnumber() {
+sub wwwnumber {
        my $number = shift;             # Number of bug to html-ize
 
        "<A HREF=\"http://bugs.debian.org/cgi-bin/bugreport.cgi?archive=no&amp;bug=" .
                urlsanit($number) . '">' . htmlsanit($number) . '</A>';
 }
 
-sub wwwname() {
+sub wwwname {
        my $name = shift;                       # Name of package
 
        "<A HREF=\"http://bugs.debian.org/cgi-bin/pkgreport.cgi?archive=no&amp;pkg=" .