From 47930f746366d5730170e817ad233e8c3e020270 Mon Sep 17 00:00:00 2001
From: Joel Martin <github@martintribe.org>
Date: Tue, 6 Jan 2015 20:55:35 -0600
Subject: Clojure: only load readline history once.

---
 clojure/src/readline.clj | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'clojure')

diff --git a/clojure/src/readline.clj b/clojure/src/readline.clj
index 0fc449a..a510e13 100644
--- a/clojure/src/readline.clj
+++ b/clojure/src/readline.clj
@@ -27,7 +27,8 @@
   (def load-history (jna/to-fn Integer readline/read_history)))
 
 (defn readline [prompt & [lib]]
-  (if (not @history-loaded)
+  (when (not @history-loaded)
+    (reset! history-loaded true)
     (load-history HISTORY-FILE))
   (let [line (readline-call prompt)]
     (when line
-- 
cgit v1.2.3