extern/shorewall_code
1
0
Fork 1
mirror of https://gitlab.com/shorewall/code.git synced 2024-11-08 16:54:10 +01:00
Code Issues Packages Projects Releases Wiki Activity

Fix undefined variable warning

Browse Source
This commit is contained in:
Tom Eastep 2009-08-31 09:08:49 -07:00
parent 9ef0dcb221
commit 5297bb8b8d
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
Shorewall/Perl/Shorewall/Config.pm
View File

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