don't forget the normal exits
This commit is contained in:
parent
6c5dd0637e
commit
98520b4d12
1 changed files with 2 additions and 1 deletions
|
|
@ -1,6 +1,6 @@
|
||||||
#!/usr/bin/perl -w
|
#!/usr/bin/perl -w
|
||||||
|
|
||||||
# $Dwarf: mvwrap,v 1.38 2002/12/13 18:54:12 ward Exp $
|
# $Dwarf: mvwrap,v 1.39 2002/12/18 12:10:39 ward Exp $
|
||||||
# $Source$
|
# $Source$
|
||||||
|
|
||||||
#
|
#
|
||||||
|
|
@ -48,6 +48,7 @@ if (@unsafe = &check_safety(\@source, \@target)) {
|
||||||
|
|
||||||
&move_files(\@source, \@target);
|
&move_files(\@source, \@target);
|
||||||
&unlock;
|
&unlock;
|
||||||
|
unlink $temp_file or die "Couldn't remove temp file: $!\n";
|
||||||
|
|
||||||
|
|
||||||
########################################################
|
########################################################
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue