- Timestamp:
- Sep 17, 2009, 2:50:23 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
dasscm/trunk/dasscm
r770 r797 519 519 } 520 520 521 522 521 523 sub svn_update( ;$ ) 522 524 { 523 525 my $update_path = shift || ""; 526 527 # return value 528 my $update_ok = 1; 524 529 525 530 # use this flag to do only one update per run … … 532 537 if ( $rc_update != 0 ) { 533 538 error("failed to update local repository ($update_path)"); 539 $update_ok = 0; 534 540 } elsif ( not $update_path ) { 535 541 … … 538 544 } 539 545 } 540 } 546 return $update_ok; 547 } 548 549 541 550 542 551 sub svn_ls( ;@ ) … … 1056 1065 #print "$basename,$dirname_prod,$dirname_repo\n"; 1057 1066 1058 ( my $rc_update, my @result ) = run_command("$SVN update $filename_repo"); 1059 if ( $rc_update != 0 ) { 1060 print @result; 1061 die; 1062 } 1067 svn_update(); 1063 1068 1064 1069 ( my $rc_diff, my @diff_result ) =
Note:
See TracChangeset
for help on using the changeset viewer.