From bb7716f82056da68e2a2837a02891bdc6be1eb07 Mon Sep 17 00:00:00 2001
From: Ward Wouts <ward@wouts.nl>
Date: Wed, 23 Jan 2013 10:57:45 +0000
Subject: [PATCH] wat netter

---
 safe_mv/safe_mv | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/safe_mv/safe_mv b/safe_mv/safe_mv
index 45b5220..87fff2d 100755
--- a/safe_mv/safe_mv
+++ b/safe_mv/safe_mv
@@ -29,11 +29,13 @@ sub process {
 		$target = "$_";
 		$target =~ s/.*\///;
 		$target = $targetdir."/".$target;
-		if ( -e "$target" ) {
-			&compare($source, $target);
-		} elsif ( ! $opt_r ) {
-			if ( $DEBUG ) { print "mv $_ -> $target\n"; }
-			else { move("$_", "$target") or die "move failed: $!"; }
+		if ( -e "$source" ) {
+			if ( -e "$target" ) {
+				&compare($source, $target);
+			} elsif ( ! $opt_r ) {
+				if ( $DEBUG ) { print "mv $source -> $target\n"; }
+				else { move("$source", "$target") or die "move failed $source -> $target: $!"; }
+			}
 		}
 	}
 }