avoid uninitialized value
This can happen when a new field, such as the new lasttry, is added.master
parent
301733ba13
commit
61f8ea7f1d
|
@ -343,7 +343,8 @@ sub savestate () {
|
|||
push @line, "tag=$_" foreach @{$data->{tags}};
|
||||
}
|
||||
else {
|
||||
push @line, "$field=".$data->{$field};
|
||||
push @line, "$field=".$data->{$field}
|
||||
if defined $data->{$field};
|
||||
}
|
||||
}
|
||||
print OUT join(" ", @line)."\n" || error("write $newfile: $!", $cleanup);
|
||||
|
|
Loading…
Reference in New Issue