Correctly handle SQL errors in <?all-rows. Fixes #40.

This commit is contained in:
Richard Newman 2016-08-23 20:47:04 -07:00
parent 15df2d9eac
commit 8b45f0ffea

View file

@ -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