From 3dd5ecd75e8008104e314726ec16a4b9118f3d8b Mon Sep 17 00:00:00 2001
From: Stelian Pop <stelian@popies.net>
Date: Mon, 13 Aug 2001 15:48:51 +0000
Subject: [PATCH] Fix the permissions for the QFA file.

---
 CHANGES     | 7 ++++++-
 dump/main.c | 4 ++--
 2 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/CHANGES b/CHANGES
index 397a697..2514ada 100644
--- a/CHANGES
+++ b/CHANGES
@@ -1,4 +1,9 @@
-$Id: CHANGES,v 1.128 2001/07/20 12:41:53 stelian Exp $
+$Id: CHANGES,v 1.129 2001/08/13 15:48:51 stelian Exp $
+
+Changes between versions 0.4b23 and 0.4b24 (released ?????????????)
+===================================================================
+
+1.	Fix the permissions of a newly created QFA file by dump.
 
 Changes between versions 0.4b22 and 0.4b23 (released July 20, 2001)
 ===================================================================
diff --git a/dump/main.c b/dump/main.c
index d7462c8..1556bf0 100644
--- a/dump/main.c
+++ b/dump/main.c
@@ -41,7 +41,7 @@
 
 #ifndef lint
 static const char rcsid[] =
-	"$Id: main.c,v 1.54 2001/07/19 09:49:35 stelian Exp $";
+	"$Id: main.c,v 1.55 2001/08/13 15:48:52 stelian Exp $";
 #endif /* not lint */
 
 #include <config.h>
@@ -745,7 +745,7 @@ main(int argc, char *argv[])
 #ifdef USE_QFA
 	if (tapepos) {
 		msg("writing QFA positions to %s\n", gTapeposfile);
-		if ((gTapeposfd = open(gTapeposfile, O_RDWR|O_CREAT)) < 0)
+		if ((gTapeposfd = open(gTapeposfile, O_RDWR|O_CREAT, S_IRUSR | S_IWUSR)) < 0)
 			quit("can't open tapeposfile\n");
 		/* print QFA-file header */
 		sprintf(gTps, "%s\n%s\n%ld\n\n", QFA_MAGIC, QFA_VERSION, (unsigned long)spcl.c_date);
-- 
2.39.5