diff --git a/mvwrap/mvwrap b/mvwrap/mvwrap
index 2230aef..1d96a7d 100755
--- a/mvwrap/mvwrap
+++ b/mvwrap/mvwrap
@@ -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";
 
 
 ########################################################