From c16ae32e70462bf40d9e1e0b3269d1ba427d0622 Mon Sep 17 00:00:00 2001
From: Tim Edwards <tim@opencircuitdesign.com>
Date: Fri, 29 May 2020 11:25:13 -0400
Subject: [PATCH] Correct readspice script to close the file after reading.

---
 tcltk/readspice.tcl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/tcltk/readspice.tcl b/tcltk/readspice.tcl
index 0ba6ab79..af789464 100644
--- a/tcltk/readspice.tcl
+++ b/tcltk/readspice.tcl
@@ -70,6 +70,7 @@ proc readspice {netfile} {
        }
    }
    lappend fdata $lastline
+   close $fnet
 
    # Now look for all ".subckt" lines