Oops. Was not correctly opening the file(was referencing a non-existant
var) in getbugstatus.
my $dir = getbugdir( $bugnum, "status" );
return {} if ( !$dir );
my $dir = getbugdir( $bugnum, "status" );
return {} if ( !$dir );
- open S, "< $status{ file }";
+ open S, "< $dir/$bugnum.status";
my @lines = qw(originator date subject msgid package tags done
forwarded mergedwith severity);
while(<S>) {
my @lines = qw(originator date subject msgid package tags done
forwarded mergedwith severity);
while(<S>) {