From c70d8528fccd50a8af1843e6c8e0da43f56f1f35 Mon Sep 17 00:00:00 2001
From: "Eric S. Raymond" <esr@thyrsus.com>
Date: Mon, 31 Jan 2000 06:09:06 +0000
Subject: Label save closes.

svn path=/trunk/; revision=2723
---
 rpa.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'rpa.c')

diff --git a/rpa.c b/rpa.c
index 7e9dde6a..f05c4072 100644
--- a/rpa.c
+++ b/rpa.c
@@ -723,7 +723,7 @@ int  len;
 	buf[i] = devrandom ? fgetc(devrandom) : random();
 
     if (devrandom)
-	fclose(devrandom);
+	fclose(devrandom);	/* should be safe, file mode was "r" */
 
     if (outlevel >= O_DEBUG)
     {
-- 
cgit v1.2.3