Commit de93881b authored by Carl Schaffer's avatar Carl Schaffer
Browse files

bugfix to

parent 7648f3f0
......@@ -242,6 +242,7 @@ pro fits_write,file_or_fcb,data,header_in,extname=extname,extver=extver, $
print,'FITS_WRITE: END missing from input header and was added'
header = [header,'END ']
hpos2 = n_elements(header)-1
hpos2 = where(keywords eq 'BEGIN EX') & hpos2 = hpos2[0] ;begin ext.
; determine if a extension was supplied and no primary data unit (PDU)
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment