Fix sample PQF
[yaz-moved-to-github.git] / util / tpath.c
index 10087cc..f04df3e 100644 (file)
@@ -1,9 +1,9 @@
 /*
- * Copyright (c) 1995-2002, Index Data.
+ * Copyright (c) 1995-2003, Index Data.
  * See the file LICENSE for details.
  * Sebastian Hammer, Adam Dickmeiss
  *
- * $Id: tpath.c,v 1.7 2002-04-05 12:46:07 adam Exp $
+ * $Id: tpath.c,v 1.9 2003-01-06 08:20:28 adam Exp $
  */
 #if HAVE_CONFIG_H
 #include <config.h>
@@ -23,7 +23,7 @@ FILE *yaz_path_fopen(const char *path, const char *name, const char *mode)
 
 int yaz_fclose (FILE *f)
 {
-    fclose (f);
+    return fclose (f);
 }
 
 FILE *yaz_fopen(const char *path, const char *name, const char *mode,