Correctly handle SQL errors in <?all-rows. Fixes #40.
This commit is contained in:
parent
14a6a9bebb
commit
dc87d7d557
1 changed files with 1 additions and 1 deletions
|
@ -76,7 +76,7 @@
|
|||
;; channel being rejected and no further row callbacks
|
||||
;; being called.
|
||||
(when (second result)
|
||||
(put! result c))
|
||||
(put! c result))
|
||||
(close! c))))
|
||||
|
||||
(defn all-rows
|
||||
|
|
Loading…
Reference in a new issue