From fbd8ee75588a3d6d9fdda2cb0ddd77d21d708ce5 Mon Sep 17 00:00:00 2001
From: Jerome Le Saux <jerome.lesaux@treezor.com>
Date: Thu, 11 Apr 2024 15:11:55 +0200
Subject: [PATCH] fix: modify twice the same byte in extension string

---
 dsk/dsk.go | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/dsk/dsk.go b/dsk/dsk.go
index ecae6e8..6a38937 100644
--- a/dsk/dsk.go
+++ b/dsk/dsk.go
@@ -831,10 +831,7 @@ func (d *DSK) CopyFile(bufFile []byte, fileName string, fileLength, maxBloc, use
 		posDir, err := d.RechercheDirLibre() // Trouve une entree libre dans le CAT
 		if err == nil {
 			dirLoc.User = uint8(userNumber) // Remplit l'entree : User 0
-			if isSystemFile {
-				dirLoc.Ext[0] |= 0x80
-			}
-			if readOnly {
+			if isSystemFile || readOnly {
 				dirLoc.Ext[0] |= 0x80
 			}
 			dirLoc.NumPage = uint8(nbPages) // Numero de l'entree dans le fichier