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
|
;; channel being rejected and no further row callbacks
|
||||||
;; being called.
|
;; being called.
|
||||||
(when (second result)
|
(when (second result)
|
||||||
(put! result c))
|
(put! c result))
|
||||||
(close! c))))
|
(close! c))))
|
||||||
|
|
||||||
(defn all-rows
|
(defn all-rows
|
||||||
|
|
Loading…
Reference in a new issue