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 14a6a9bebb
commit dc87d7d557

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