Changeset 226

Timestamp:

Nov 20, 2007, 4:44:28 PM (17 years ago)

Author:

joergs

Message:

quoting filenames to handle filenames with spaces

File:

• trunk/dasscm/dasscm (modified) (1 diff)

trunk/dasscm/dasscm

@@ -448 +448 @@
         for my $dir ( split( '/', $dirname_prod ) ) {
             if ($dir) {
-                run_command("$SVN add --non-recursive $dir");
+                my( $rc, @out ) = run_command("$SVN add --non-recursive \"" . $dir . "\"" );
+                if( $rc > 0 ) {
+                    print join( "\n", @out );
+                } 
                 chdir $dir;
             }
         }
-        run_command("$SVN add $basename");
+        my( $rc, @out ) = run_command("$SVN add \"" . $basename . "\"");
+        if( $rc > 0 ) {
+            print join( "\n", @out );
+        } 
     }
 }