227633d
diff -rupN devscripts-2.13.5/scripts/uscan.pl devscripts-2.13.5-new/scripts/uscan.pl
227633d
--- devscripts-2.13.5/scripts/uscan.pl	2013-12-05 04:27:55.000000000 +0100
227633d
+++ devscripts-2.13.5-new/scripts/uscan.pl	2013-12-11 10:17:12.715256802 +0100
227633d
@@ -2171,12 +2171,12 @@ sub get_main_source_dir($$$$) {
227633d
     foreach my $file (@files) {
227633d
 	unless ($file =~ /^\.\.?/) {
227633d
 	    if ( -d "${tempdir}/$file" ) {
227633d
-                # HELP: why can't perl move not move directories????
227633d
-                system( "mv ${tempdir}/$file $main_source_dir" ) ;
227633d
-            } else {
227633d
-                move("${tempdir}/$file", $main_source_dir) or die("Unable to move ${tempdir}/$file directory $main_source_dir\n");
227633d
-            }
227633d
-        }
227633d
+		# HELP: why can't perl move not move directories????
227633d
+		system('mv', "${tempdir}/$file", $main_source_dir);
227633d
+	    } else {
227633d
+		move("${tempdir}/$file", $main_source_dir) or die("Unable to move ${tempdir}/$file directory $main_source_dir\n");
227633d
+	    }
227633d
+	}
227633d
     }
227633d
     return $main_source_dir;
227633d
 }