X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/1691e80890e5d8ba258c51c214a3e91880e1db2b..e66e25ec491d0fb3df708000d8494b4d598f0263:/uip/scansbr.c

diff --git a/uip/scansbr.c b/uip/scansbr.c
index 44cbf0d4..143a059c 100644
--- a/uip/scansbr.c
+++ b/uip/scansbr.c
@@ -353,7 +353,7 @@ finished:
     }
     *--nxtbuf = tmpbuf;
 
-    if (outnum && fclose (scnout) == EOF)
+    if (outnum && (ferror(scnout) || fclose (scnout) == EOF))
 	adios (scnmsg, "write error on");
 
     return (state != FILEEOF ? SCNERR : encrypted ? SCNENC : SCNMSG);