Changeset 39672 for branches/czw_branch/20160809/Nebulous-Server/bin/neb-cabadd

Timestamp:

Sep 9, 2016, 11:38:38 AM (10 years ago)

Author:

watersc1

Message:

Typo fix, switch to proximity find.

File:

• branches/czw_branch/20160809/Nebulous-Server/bin/neb-cabadd (modified) (3 diffs)

branches/czw_branch/20160809/Nebulous-Server/bin/neb-cabadd

@@ -19 +19 @@
 use Pod::Usage qw( pod2usage );
 
-my ($db, $dbhost, $dbuser, $dbpass, $cname, $location, $site_id, $update);
+my ($db, $dbhost, $dbuser, $dbpass, $cname, $location, $site_id, $update, $cab_id);
 
 $db     = $ENV{'NEB_DB'} unless $db;
@@ -34 +34 @@
     'location|l=s'      => \$location,
     'site_id|s=s'       => \$site_id,
+    'cab_id=s'          => \$cab_id,
     'update|u'          => \$update,
 ) || pod2usage( 2 );
@@ -55 +56 @@
 
 if (defined($update)) {
-    unless ($cname && $location && $site_id) {
-        pod2usage( -msg => "Required options for update: --db --user --pass --cname --site_id --location", -exitval => 2 );
+    unless ($cname && $location && $site_id && $cab_id) {
+        pod2usage( -msg => "Required options for update: --db --user --pass --cname --site_id --location --cab_id", -exitval => 2 );
     }
     print "Updating cabinet...";