--- ray/src/px/ra_rgbe.c	2024/09/10 20:24:42	2.23
+++ ray/src/px/ra_rgbe.c	2025/04/22 04:45:25	2.24
@@ -1,5 +1,5 @@
 #ifndef lint
-static const char	RCSid[] = "$Id: ra_rgbe.c,v 2.23 2024/09/10 20:24:42 greg Exp $";
+static const char	RCSid[] = "$Id: ra_rgbe.c,v 2.24 2025/04/22 04:45:25 greg Exp $";
 #endif
 /*
  *  program to convert from RADIANCE RLE to flat format
@@ -191,9 +191,13 @@ transfer(			/* transfer a Radiance picture */
 	free(scanin);			/* clean up */
 	if (fflush(fp) == EOF)
 		goto writerr;
-	if (oname[0] == '!')
-		pclose(fp);
-	else if (ospec != NULL)
+	if (oname[0] == '!') {
+		if (pclose(fp) != 0) {
+			fprintf(stderr, "%s: bad status from \"%s\"\n",
+					progname, oname);
+			exit(1);
+		}
+	} else if (ospec != NULL)
 		fclose(fp);
 	return(1);
 writerr: