Changeset 20590

Timestamp:

Nov 7, 2008, 9:21:53 PM (18 years ago)

Author:

Paul Price

Message:

Fixing syntax errors.

File:

• trunk/tools/chip_outputs.pl (modified) (3 diffs)

trunk/tools/chip_outputs.pl

@@ -48 +48 @@
 # Query to run
 my $sql = "SELECT path_base, class_id" .
-    " FROM chipProcessedImfile "
+    " FROM chipProcessedImfile " .
     " WHERE chip_id = $chip_id";
 
@@ -58 +58 @@
     @products = split /,/, $products;
 } else {
-    @products = keys EXTENSIONS();
+    @products = keys %{EXTENSIONS()};
 }
 
@@ -67 +67 @@
     my $name = "$path.$class_id"; # Full name
     foreach my $product ( @products ) {
-        copy_extension( $name, EXTENSIONS(){$product} );
+        copy_extension( $name, ${EXTENSIONS()}{$product} );
     }
 }