Commit a92acde5 authored by Leigh Stoller's avatar Leigh Stoller

Exit silently if not Utah.

parent e78f5a2f
......@@ -2,7 +2,7 @@
#
# EMULAB-COPYRIGHT
# Copyright (c) 2005, 2006, 2007 University of Utah and the Flux Group.
# Copyright (c) 2005-2009 University of Utah and the Flux Group.
# All rights reserved.
#
......@@ -40,6 +40,7 @@ my $optlist = "dc";
my $TB = "@prefix@";
my $DBNAME = "@TBDBNAME@";
my $TBOPS = "@TBOPSEMAIL@";
my $MAINSITE = @TBMAINSITE@;
# XXX
my $BUILDING = "MEB-ROBOTS";
......@@ -52,9 +53,6 @@ use libtestbed;
use User;
use Project;
# Be careful not to exit on transient error
$libdb::DBQUERY_MAXTRIES = 30;
#
# These come from the library.
#
......@@ -113,6 +111,10 @@ if (defined($options{"c"})) {
$cleanup = $options{"c"};
}
# Do not bother outside of Utah.
exit(0)
if (! $MAINSITE);
if ($cleanup) {
# For testing purposes mostly, cleanup any leftovers...
DBQueryFatal("delete from reserved ".
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment