Changeset 929 for dasscm/trunk/usr/bin

Timestamp:

Sep 23, 2010, 2:45:44 PM (14 years ago)

Author:

joergs

Message:

add missing return codes

File:

• dasscm/trunk/usr/bin/dasscm (modified) (14 diffs)

dasscm/trunk/usr/bin/dasscm

@@ -1169 +1169 @@
         usage();
     }
+
+    return $RETURN_OK;
 }
 
@@ -1239 +1241 @@
         "cd $DASSCM_LOCAL_REPOSITORY_BASE; $SVN checkout $svnCheckoutCredentials $svnOptions $DASSCM_SVN_REPOSITORY"
     );
+
+    return $retcode;
 }
 
 sub ls(@)
 {
+    my $return_code = $RETURN_OK;
     check_parameter( @_, 1 );
     check_env();
@@ -1252 +1257 @@
         print "\n";
     }
+    return $return_code;
 }
 
 sub update(@)
 {
+    my $return_code = $RETURN_OK;
     check_parameter( @_, 1 );
     check_env();
@@ -1262 +1269 @@
     # update local repository
     #
-    svn_update();
+    if( ! svn_update() ) {
+        $return_code = $RETURN_NOK;
+    }
+    return $return_code;
 }
 
@@ -1356 +1366 @@
     # so a revert is performed in any case
     svn_revert();
+    return $retcode;
 }
 
@@ -1414 +1425 @@
     # so a revert is performed in any case
     svn_revert();
+    return $retcode;
 }
 
@@ -1505 +1517 @@
     ) = get_filenames( $_[0] );
 
-    my $retcode = run_interactive("$SVN blame $svnOptions $filename_repo");
+    my $retcode = run_interactive("$SVN blame --non-interactive $svnCheckoutCredentials $svnOptions $filename_repo");
+    return $retcode;
 }
 
@@ -1529 +1542 @@
 
     print @diff_result;
+    return $rc_diff;
 }
 
@@ -1670 +1684 @@
 sub cleanup()
 {
+    my $return_code = $RETURN_OK;
+
     check_env();
 
     svn_revert($DASSCM_REPO);
     svn_remove_unknown_files($DASSCM_REPO);
+
+    return $return_code;
 }
 
@@ -1684 +1702 @@
     my @input            = @_;
     my %options_complete = ();
+
+    my $return_code = $RETURN_OK;
 
     # check and remove global options. if options are wrong, nothing to do
@@ -1739 +1759 @@
         }
     }
+    return $return_code;
 }
 
 sub complete_path(@)
 {
+    my $return_code = $RETURN_OK;
     check_parameter( @_, 1 );
     check_env();
@@ -1760 +1782 @@
         print "\n";
     }
+    return $return_code;
 }
 
 sub complete_repopath(@)
 {
+    my $return_code = $RETURN_OK;
     check_parameter( @_, 1 );
     check_env();
@@ -1789 +1813 @@
         print "\n";
     }
-
+    return $return_code;
 }
 
@@ -1878 +1902 @@
 # action accordinly to command are taken
 #
-&{ get_command_function($command) }(@ARGV);
+$return_code = &{ get_command_function($command) }(@ARGV);
 
 exit $return_code;