Changeset 38373 for trunk

Timestamp:

Jun 5, 2015, 9:00:20 AM (11 years ago)

Author:

bills

Message:

remove hardcoded path to croot in checkexp.
added the program croot

Location:

trunk/tools

Files:

• checkexp (modified) (3 diffs)
• croot (added)

trunk/tools/checkexp

@@ -22 +22 @@
 my $dbname;
 
+# this program must be in the path. There is one in the tools directory
+my $croot = 'croot';
+
 GetOptions(
            'start|s=s'    => \$startDate,
            'end|e=s'      => \$endDate,
            'dbname|d=s'   => \$dbname,
+           'camera=s'     => \$dbname,
            'verbose|v'    => \$verbose,
 ) or pod2usage( 0 );
@@ -35 +39 @@
 
 if (!$dbname) {
-    my $dbname = "gpc1";
+    $dbname = "gpc1";
 }
 
@@ -68 +72 @@
 
 print "Summit Copy and Registration Status\n\n";
-my $scode = system "~bills/bin/croot";
+my $scode = system "$croot --camera $dbname";
 if ($scode) {
     print STDERR "croot failed with $scode\n";