From: Don Armstrong Date: Wed, 19 Mar 2014 00:36:18 +0000 (-0700) Subject: return $bugs and use $bugs in scandir X-Git-Url: https://git.donarmstrong.com/?p=bugscan.git;a=commitdiff_plain;h=fddc4aff4b6bdcc5c1fa4ec5d9a90e6f7ca4ed1d return $bugs and use $bugs in scandir --- diff --git a/scanlib.pm b/scanlib.pm index b3ea1ef..cc32b45 100644 --- a/scanlib.pm +++ b/scanlib.pm @@ -249,8 +249,9 @@ sub scanspooldir { my $taginfo = get_taginfo($bi); my $relinfo = get_relinfo($bi); - $bugs{$f} = $bi; + $bugs->{$f} = $bi; } + return $bugs; }