Changeset 1798 in Sophya for trunk/ArchTOIPipe

Timestamp:

Nov 27, 2001, 11:05:41 PM (24 years ago)

Author:

aubourg

Message:

bugacecile

File:

• trunk/ArchTOIPipe/Kernel/fitstoiwtr.cc (modified) (2 diffs)

trunk/ArchTOIPipe/Kernel/fitstoiwtr.cc

@@ -3 +3 @@
 //                               Christophe Magneville
 //                               Reza Ansari
-// $Id: fitstoiwtr.cc,v 1.19 2001-11-22 16:54:54 cecile Exp $
+// $Id: fitstoiwtr.cc,v 1.20 2001-11-27 22:05:41 aubourg Exp $
 
 #include "fitstoiwtr.h"
@@ -147 +147 @@
       //cout << " DBG-B-FitsWriter::run()" << sn << endl;
       
+      fits_lock();
       if (!implicitSN) {
         double xx = sn;
         fits_write_col_dbl(fptr, 1, fitsLine, 1, 1, &xx, &fstatus);
       }
-      fits_lock();
         
       for (i=0; i<ndata; i++) {