Changeset 24831 for trunk/pstamp/scripts/pstamp_revert_request.pl
- Timestamp:
- Jul 16, 2009, 5:14:07 PM (17 years ago)
- File:
-
- 1 edited
-
trunk/pstamp/scripts/pstamp_revert_request.pl (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/pstamp/scripts/pstamp_revert_request.pl
r20256 r24831 31 31 32 32 33 my ( $req_id, $dbname, $ verbose, $save_temps );33 my ( $req_id, $dbname, $dbserver, $verbose, $save_temps ); 34 34 35 35 GetOptions( 36 36 'req_id=s' => \$req_id, 37 37 'dbname=s' => \$dbname, 38 'dbserver=s' => \$dbserver, 38 39 'verbose' => \$verbose, 39 40 'save-temps' => \$save_temps, … … 65 66 my $command = "$pstamptool -listreq -req_id $req_id"; 66 67 $command .= " -dbname $dbname" if $dbname; 68 $command .= " -dbserver $dbserver" if $dbserver; 67 69 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 68 70 run(command => $command, verbose => $verbose); … … 97 99 if ($product and $fileset) { 98 100 my $command = "$dsreg --del $fileset --product $product --rm --force"; 99 $command .= " --dbname $dbname" if $dbname; 101 # don't add dbname let dsreg get it from the DS_DBNAME in site.config 102 # $command .= " --dbname $dbname" if $dbname; 100 103 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 101 104 run(command => $command, verbose => $verbose); … … 109 112 my $command = "$pstamptool -revertreq -req_id $req_id"; 110 113 $command .= " -dbname $dbname" if $dbname; 114 $command .= " -dbserver $dbserver" if $dbserver; 111 115 my ( $success, $error_code, $full_buf, $stdout_buf, $stderr_buf ) = 112 116 run(command => $command, verbose => $verbose);
Note:
See TracChangeset
for help on using the changeset viewer.
