Changeset 929 for dasscm/trunk/usr/bin


Ignore:
Timestamp:
Sep 23, 2010, 2:45:44 PM (14 years ago)
Author:
joergs
Message:

add missing return codes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • dasscm/trunk/usr/bin/dasscm

    r926 r929  
    11691169        usage();
    11701170    }
     1171
     1172    return $RETURN_OK;
    11711173}
    11721174
     
    12391241        "cd $DASSCM_LOCAL_REPOSITORY_BASE; $SVN checkout $svnCheckoutCredentials $svnOptions $DASSCM_SVN_REPOSITORY"
    12401242    );
     1243
     1244    return $retcode;
    12411245}
    12421246
    12431247sub ls(@)
    12441248{
     1249    my $return_code = $RETURN_OK;
    12451250    check_parameter( @_, 1 );
    12461251    check_env();
     
    12521257        print "\n";
    12531258    }
     1259    return $return_code;
    12541260}
    12551261
    12561262sub update(@)
    12571263{
     1264    my $return_code = $RETURN_OK;
    12581265    check_parameter( @_, 1 );
    12591266    check_env();
     
    12621269    # update local repository
    12631270    #
    1264     svn_update();
     1271    if( ! svn_update() ) {
     1272        $return_code = $RETURN_NOK;
     1273    }
     1274    return $return_code;
    12651275}
    12661276
     
    13561366    # so a revert is performed in any case
    13571367    svn_revert();
     1368    return $retcode;
    13581369}
    13591370
     
    14141425    # so a revert is performed in any case
    14151426    svn_revert();
     1427    return $retcode;
    14161428}
    14171429
     
    15051517    ) = get_filenames( $_[0] );
    15061518
    1507     my $retcode = run_interactive("$SVN blame $svnOptions $filename_repo");
     1519    my $retcode = run_interactive("$SVN blame --non-interactive $svnCheckoutCredentials $svnOptions $filename_repo");
     1520    return $retcode;
    15081521}
    15091522
     
    15291542
    15301543    print @diff_result;
     1544    return $rc_diff;
    15311545}
    15321546
     
    16701684sub cleanup()
    16711685{
     1686    my $return_code = $RETURN_OK;
     1687
    16721688    check_env();
    16731689
    16741690    svn_revert($DASSCM_REPO);
    16751691    svn_remove_unknown_files($DASSCM_REPO);
     1692
     1693    return $return_code;
    16761694}
    16771695
     
    16841702    my @input            = @_;
    16851703    my %options_complete = ();
     1704
     1705    my $return_code = $RETURN_OK;
    16861706
    16871707    # check and remove global options. if options are wrong, nothing to do
     
    17391759        }
    17401760    }
     1761    return $return_code;
    17411762}
    17421763
    17431764sub complete_path(@)
    17441765{
     1766    my $return_code = $RETURN_OK;
    17451767    check_parameter( @_, 1 );
    17461768    check_env();
     
    17601782        print "\n";
    17611783    }
     1784    return $return_code;
    17621785}
    17631786
    17641787sub complete_repopath(@)
    17651788{
     1789    my $return_code = $RETURN_OK;
    17661790    check_parameter( @_, 1 );
    17671791    check_env();
     
    17891813        print "\n";
    17901814    }
    1791 
     1815    return $return_code;
    17921816}
    17931817
     
    18781902# action accordinly to command are taken
    18791903#
    1880 &{ get_command_function($command) }(@ARGV);
     1904$return_code = &{ get_command_function($command) }(@ARGV);
    18811905
    18821906exit $return_code;
Note: See TracChangeset for help on using the changeset viewer.