Index: trunk/ippScripts/scripts/ipp_mops_translate.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_mops_translate.pl	(revision 24190)
+++ trunk/ippScripts/scripts/ipp_mops_translate.pl	(revision 24191)
@@ -78,8 +78,4 @@
 check_fitsio($status);
 
-# Plate scales
-my $cdelt1 = $$inHeader{'CDELT1'} or die("Can't find CDELT1");
-my $cdelt2 = $$inHeader{'CDELT2'} or die("Can't find CDELT2");
-
 # Read table data
 $inFits->movnam_hdu(BINARY_TBL, $extname, 0, $status) and check_fitsio($status);
@@ -109,4 +105,10 @@
 }
 
+# Plate scales
+#my $cdelt1 = $$inHeader{'CDELT1'} or die("Can't find CDELT1");
+#my $cdelt2 = $$inHeader{'CDELT2'} or die("Can't find CDELT2");
+### XXX WCS wasn't being set in inverse diffs, but it's available elsewhere
+my $cdelt1 = $$scale[0] / 3600;
+my $cdelt2 = $$scale[1] / 3600;
 
 # Parse the list of columns