Changeset 50

Timestamp:

Feb 14, 2003, 4:30:33 AM (23 years ago)

Author:

eugene

Message:

using flips routines from PATH

Location:

trunk/Ohana/src/perl/src

Files:

• defringe (modified) (1 diff)
• detflips (modified) (1 diff)
• flatten.flips (modified) (1 diff)
• fr.defringe (modified) (1 diff)
• getfringe (modified) (1 diff)

trunk/Ohana/src/perl/src/defringe

@@ -95 +95 @@
     close (FILE);
 
-    vsystem ("/data/elixir2/elixir/flips2/imcombred $parfile");
+    vsystem ("imcombred $parfile");
     if ($?) { &escape ("ERROR: failure running imcombred"); }
 }

trunk/Ohana/src/perl/src/detflips

@@ -49 +49 @@
 
 system ("cp $inlist $temp2");
-system ("/data/elixir2/elixir/flips2/imcombred $temp1");
+system ("imcombred $temp1");
 $stat = $?;
 
-# unlink ($temp1);
-# unlink ($temp2);
+unlink ($temp1);
+unlink ($temp2);
 
 if ($stat) {

trunk/Ohana/src/perl/src/flatten.flips

@@ -176 +176 @@
 close (FILE);
 
-system ("/data/elixir2/elixir/flips2/imred $temp");
+system ("imred $temp");
 $stat = $?;
 

trunk/Ohana/src/perl/src/fr.defringe

@@ -62 +62 @@
 
     if (-e $output[$i]) { unlink $output[$i]; }
-    vsystem ("/data/elixir2/elixir/flips2/imcombred $parfile");
+    vsystem ("imcombred $parfile");
     if ($?) { &escape ("ERROR: failure running imcombred"); }
 }

trunk/Ohana/src/perl/src/getfringe

@@ -52 +52 @@
 
 # run imstat (change to flips2 version)
-system ("/data/elixir2/elixir/flips2/imstat_binary $temp2 > /dev/null");
+system ("imstat $temp2 > /dev/null");
 if ($?) { &escape ("failure in imstat"); }