Changeset 17739
- Timestamp:
- May 19, 2008, 11:24:15 AM (18 years ago)
- Location:
- trunk/DataStore/scripts
- Files:
-
- 5 edited
-
dsfilesetls (modified) (2 diffs)
-
dsget (modified) (2 diffs)
-
dsleech (modified) (2 diffs)
-
dsproductls (modified) (2 diffs)
-
dsrootls (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/DataStore/scripts/dsfilesetls
r17649 r17739 3 3 # Copyright (C) 2006-2008 Joshua Hoblitt 4 4 # 5 # $Id: dsfilesetls,v 1. 8 2008-05-13 03:12:52jhoblitt Exp $5 # $Id: dsfilesetls,v 1.9 2008-05-19 21:24:15 jhoblitt Exp $ 6 6 7 7 use strict; … … 36 36 ); 37 37 38 unless (defined $response or$response->is_success) {38 unless (defined $response and $response->is_success) { 39 39 warn "request failed: ", $response->status_line; 40 40 exit($response->code - 300); -
trunk/DataStore/scripts/dsget
r17718 r17739 3 3 # Copyright (C) 2006-2008 Joshua Hoblitt 4 4 # 5 # $Id: dsget,v 1.2 7 2008-05-16 20:36:03jhoblitt Exp $5 # $Id: dsget,v 1.28 2008-05-19 21:24:15 jhoblitt Exp $ 6 6 7 7 use strict; … … 131 131 132 132 133 unless (defined $response or$response->is_success) {133 unless (defined $response and $response->is_success) { 134 134 warn "request failed: ", $response->status_line; 135 135 exit($response->code - 300); -
trunk/DataStore/scripts/dsleech
r17649 r17739 3 3 # Copyright (C) 2006-2008 Joshua Hoblitt 4 4 # 5 # $Id: dsleech,v 1.1 1 2008-05-13 03:12:52jhoblitt Exp $5 # $Id: dsleech,v 1.12 2008-05-19 21:24:15 jhoblitt Exp $ 6 6 7 7 use strict; … … 67 67 ); 68 68 69 unless (defined $response or$response->is_success) {69 unless (defined $response and $response->is_success) { 70 70 warn "request failed: ", $response->status_line; 71 71 exit($response->code - 300); -
trunk/DataStore/scripts/dsproductls
r17649 r17739 3 3 # Copyright (C) 2006-2008 Joshua Hoblitt 4 4 # 5 # $Id: dsproductls,v 1. 5 2008-05-13 03:12:52jhoblitt Exp $5 # $Id: dsproductls,v 1.6 2008-05-19 21:24:15 jhoblitt Exp $ 6 6 7 7 use strict; … … 43 43 ); 44 44 45 unless (defined $response or$response->is_success) {45 unless (defined $response and $response->is_success) { 46 46 warn "request failed: ", $response->status_line; 47 47 exit($response->code - 300); -
trunk/DataStore/scripts/dsrootls
r17649 r17739 3 3 # Copyright (C) 2006-2008 Joshua Hoblitt 4 4 # 5 # $Id: dsrootls,v 1. 3 2008-05-13 03:12:52jhoblitt Exp $5 # $Id: dsrootls,v 1.4 2008-05-19 21:24:15 jhoblitt Exp $ 6 6 7 7 use strict; … … 40 40 ); 41 41 42 unless (defined $response or$response->is_success) {42 unless (defined $response and $response->is_success) { 43 43 warn "request failed: ", $response->status_line; 44 44 exit($response->code - 300);
Note:
See TracChangeset
for help on using the changeset viewer.
