Changeset 13176

Timestamp:

May 2, 2007, 3:47:13 PM (19 years ago)

Author:

Paul Price

Message:

Need to resolve tessellation catdir.

File:

• trunk/ippScripts/scripts/warp_overlap.pl (modified) (2 diffs)

trunk/ippScripts/scripts/warp_overlap.pl

@@ -56 +56 @@
 my $missing_tools;
 my $warptool = can_run('warptool') or (warn "Can't find warptool" and $missing_tools = 1);
-my $dvoImageOverlaps = can_run('dvoImageOverlaps') or (warp "Can't find dvoImageOverlaps" and $missing_tools = 1);
-my $dvoImageExtract = can_run('dvoImageExtract') or (warp "Can't find dvoImageExtract" and $missing_tools = 1);
+my $dvoImageOverlaps = can_run('dvoImageOverlaps') or (warn "Can't find dvoImageOverlaps" and $missing_tools = 1);
+my $dvoImageExtract = can_run('dvoImageExtract') or (warn "Can't find dvoImageExtract" and $missing_tools = 1);
 if ($missing_tools) { 
     warn("Can't find required tools.");
@@ -111 +111 @@
     my $tessellations = $ipprc->tessellations(); # Hash of defined tessellations
     foreach my $tess_id ( keys %$tessellations ) {
-        my $tess_dir = $$tessellations{$tess_id};
+        my $tess_dir = $ipprc->convert_filename_absolute( $$tessellations{$tess_id} ); # Catdir for DVO
         print STDERR "tessellation: $tess_id, $tess_dir\n";