don't forget the normal exits

This commit is contained in:
Ward Wouts 2002-12-18 12:11:47 +00:00
parent 6c5dd0637e
commit 98520b4d12

View file

@ -1,6 +1,6 @@
#!/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$
#
@ -48,6 +48,7 @@ if (@unsafe = &check_safety(\@source, \@target)) {
&move_files(\@source, \@target);
&unlock;
unlink $temp_file or die "Couldn't remove temp file: $!\n";
########################################################