fix(sqawk): do not close input ch if it is stdin

v0.23.1
dbohdan · Aug 24, 2021 · 9ca7455 · 9ca7455
1 parent a2caae0
commit 9ca7455
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/lib/classes/sqawk.tcl b/lib/classes/sqawk.tcl
@@ -194,7 +194,9 @@ namespace eval ::sqawk {}
 
         $newTable insert-rows [list $parser next]
         $parser destroy
-        close $ch
+        if {$ch ne {stdin}} {
+            close $ch
+        }
 
         dict set tables $metadata(table) $newTable
         return $newTable

diff --git a/sqawk-dev.tcl b/sqawk-dev.tcl
@@ -9,7 +9,7 @@ package require snit 2
 package require sqlite3
 
 namespace eval ::sqawk {
-    variable version 0.23.0
+    variable version 0.23.1
 }
 
 # The following comment is used by Assemble when bundling Sqawk's source code in