From 03c0d429f1ab7cc5d8152c008c8dd8d8a76da01f Mon Sep 17 00:00:00 2001
From: Blake McBride <blake@arahant.com>
Date: Sun, 3 Jan 2021 12:16:02 -0600
Subject: [PATCH] Don't close a file that hasn't been opened

---
 src/dsk.c | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/dsk.c b/src/dsk.c
index dba87ff..e5193f2 100644
--- a/src/dsk.c
+++ b/src/dsk.c
@@ -453,7 +453,6 @@ LispPTR COM_openfile(register LispPTR *args)
          * maintain a version status.
          */
         if (maintain_version(file, (FileName *)NULL, 1) == 0) {
-          TIMEOUT(rval = close(fd));
           *Lisp_errno = errno;
           return (NIL);
         }