Fix undefined variable warning

This commit is contained in:
Tom Eastep 2009-08-31 09:08:49 -07:00
parent 9ef0dcb221
commit 5297bb8b8d

View File

@ -689,10 +689,9 @@ sub cleanup() {
# #
# Unlink temporary files # Unlink temporary files
# #
unlink $tempfile, $tempfile = undef if $tempfile; unlink ( $tempfile ), $tempfile = undef if $tempfile;
unlink $scriptfilename, $scriptfilename = undef if $scriptfilename; unlink ( $scriptfilename ), $scriptfilename = undef if $scriptfilename;
unlink $_ for @tempfiles; unlink ( @tempfiles ), @tempfiles = () if @tempfiles;
@tempfiles = ();
} }
# #