diff --git a/configure.ac b/configure.ac
index 07e1b37..cf0601e 100644
--- a/configure.ac
+++ b/configure.ac
@@ -31,7 +31,7 @@ define([AC_CACHE_LOAD],)
define([AC_CACHE_SAVE],)
# This is your standard AstrOmatic source code...
-AC_INIT([SExtractor],[2.28.0],[astromatic@astromatic.iap.fr],
+AC_INIT([SExtractor],[2.28.1],[astromatic@astromatic.iap.fr],
[sextractor],[http://astromatic.net/software/sextractor])
AC_CONFIG_MACRO_DIR([m4])
AC_CONFIG_AUX_DIR(autoconf)
diff --git a/src/fits/fitscat.c b/src/fits/fitscat.c
index efe9a0c..dac7757 100644
--- a/src/fits/fitscat.c
+++ b/src/fits/fitscat.c
@@ -7,7 +7,7 @@
*
* This file part of: AstrOmatic FITS/LDAC library
*
-* Copyright: (C) 1995-2023 CFHT/IAP/CNRS/SorbonneU
+* Copyright: (C) 1995-2024 CEA/AIM/UParisSaclay
*
* License: GNU General Public License
*
@@ -23,8 +23,6 @@
* along with AstrOmatic software.
* If not, see .
*
-* Last modified: 25/02/2023
-*
*%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*/
#ifdef HAVE_CONFIG_H
@@ -176,8 +174,8 @@ PURPOSE Close a file previously opened by cfitsio
INPUT fitsfile structure.
OUTPUT RETURN_OK if everything went as expected (exit in error otherwise).
NOTES the fitsfile pointer is set to NULL;
-AUTHOR E. Bertin (CFHT/IAP/CNRS/SorbonneU)
-VERSION 25/02/2023
+AUTHOR E. Bertin (CEA/AIM/UParisSaclay)
+VERSION 11/10/2024
***/
int close_cfitsio(catstruct *cat) {
@@ -190,7 +188,7 @@ int close_cfitsio(catstruct *cat) {
cat->filename);
} else {
// Successfully closed FITS file with cfitsio
- cat->infptr == NULL;
+ cat->infptr = NULL;
// Free random seed in CFITSIO.
QFREE(fits_rand_value);
}
diff --git a/src/fits/fitswrite.c b/src/fits/fitswrite.c
index 6cda309..7727515 100644
--- a/src/fits/fitswrite.c
+++ b/src/fits/fitswrite.c
@@ -7,7 +7,7 @@
*
* This file part of: AstrOmatic FITS/LDAC library
*
-* Copyright: (C) 1995-2020 IAP/CNRS/SorbonneU
+* Copyright: (C) 1995-2024 CEA/AIM/UParisSaclay
*
* License: GNU General Public License
*
@@ -23,8 +23,6 @@
* along with AstrOmatic software.
* If not, see .
*
-* Last modified: 26/08/2020
-*
*%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*/
#ifdef HAVE_CONFIG_H
@@ -452,7 +450,7 @@ void print_obj(FILE *stream, tabstruct *tab)
fprintf(stream, "F");
}
else
- fprintf(stream, key->printf?key->printf:"%d", (int)*ptr);
+ fprintf(stream, *key->printf?key->printf:"%d", (int)*ptr);
if (i)
putc(' ', stream);
break;
@@ -480,8 +478,8 @@ INPUT Output stream
Table structure.
OUTPUT -.
NOTES -.
-AUTHOR G. Tissier & E.Bertin (IAP)
-VERSION 13/06/2012
+AUTHOR G. Tissier (IAP) & E.Bertin (CEA/AIM/UParisSaclay)
+VERSION 11/10/2024
***/
void voprint_obj(FILE *stream, tabstruct *tab)
@@ -538,7 +536,7 @@ void voprint_obj(FILE *stream, tabstruct *tab)
fprintf(stream, "F");
}
else
- fprintf(stream, key->printf?key->printf:"%d", (int)*ptr);
+ fprintf(stream, *key->printf?key->printf:"%d", (int)*ptr);
if (i)
putc(' ', stream);
break;