Changeset 37339

Timestamp:

Aug 29, 2014, 5:41:40 PM (12 years ago)

Author:

watersc1

Message:

The component map was being generated wrong. I think this new version creates the things in the way we want them.

File:

• tags/ipp-pv3-20140717/ippScripts/scripts/sc_prepare_stack.pl (modified) (1 diff)

tags/ipp-pv3-20140717/ippScripts/scripts/sc_prepare_stack.pl

@@ -153 +153 @@
         # Append file names to transfer lists so we can recover if warps are deleted.
         my $remote_file;
+        my $ipp_disk;
+        #  ${remote_root}/tmp/${ipp_disk}
         (undef,$remote_file) = &uri_to_outputs($warp_path_base . ".fits");
-        print COMPMAP "${warp_path_base}.fits $remote_file\n";
+        ($ipp_disk,undef)    = &uri_convert($warp_path_base . ".fits");
+        print COMPMAP "$remote_file ${remote_root}/tmp/${ipp_disk}\n";
         (undef,$remote_file) = &uri_to_outputs($warp_path_base . ".wt.fits");
-        print COMPMAP "${warp_path_base}.wt.fits $remote_file\n";
+        ($ipp_disk,undef)    = &uri_convert($warp_path_base . ".wt.fits");
+        print COMPMAP "$remote_file ${remote_root}/tmp/${ipp_disk}\n";
         (undef,$remote_file) = &uri_to_outputs($warp_path_base . ".mask.fits");
-        print COMPMAP "${warp_path_base}.maskfits $remote_file\n";
+        ($ipp_disk,undef)    = &uri_convert($warp_path_base . ".mask.fits");
+        print COMPMAP "$remote_file ${remote_root}/tmp/${ipp_disk}\n";
         (undef,$remote_file) = &uri_to_outputs($warp_path_base . ".cmf");
-        print COMPMAP "${warp_path_base}.cmf $remote_file\n";
+        ($ipp_disk,undef)    = &uri_convert($warp_path_base . ".cmf");
+        print COMPMAP "$remote_file ${remote_root}/tmp/${ipp_disk}\n";
         (undef,$remote_file) = &uri_to_outputs($warp_path_base . ".psf");
-        print COMPMAP "${warp_path_base}.psf $remote_file\n";
+        ($ipp_disk,undef)    = &uri_convert($warp_path_base . ".psf");
+        print COMPMAP "$remote_file ${remote_root}/tmp/${ipp_disk}\n";
     }