Index: trunk/ippScripts/scripts/ipp_mops_translate.pl
===================================================================
--- trunk/ippScripts/scripts/ipp_mops_translate.pl	(revision 19717)
+++ trunk/ippScripts/scripts/ipp_mops_translate.pl	(revision 19718)
@@ -180,5 +180,5 @@
     my $exptime = $inHeader->{'EXPTIME'} or die "Can't find EXPTIME.\n"; # Exposure time, seconds
     $mjd += $exptime / 2.0;     # start --> mid-point
-    $outFiles->write_key( TDOUBLE, 'MJD-OBS', $mjd, 'Time of exposure mid-point', $status);
+    $outFits->write_key( TDOUBLE, 'MJD-OBS', $mjd, 'Time of exposure mid-point', $status);
     check_fitsio( $status );
 }