diff options
Diffstat (limited to 'src/clojure/contrib/repl_utils.clj')
| -rw-r--r-- | src/clojure/contrib/repl_utils.clj | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/clojure/contrib/repl_utils.clj b/src/clojure/contrib/repl_utils.clj index a5ab9c41..14e14c70 100644 --- a/src/clojure/contrib/repl_utils.clj +++ b/src/clojure/contrib/repl_utils.clj @@ -125,9 +125,9 @@ [] (when-not (dosync - (let [inited @break-threads] - (ref-set break-threads {}) - inited)) + (if-let [inited @break-threads] + inited + (ref-set break-threads {}))) (sun.misc.Signal/handle (sun.misc.Signal. "INT") (proxy [sun.misc.SignalHandler] [] |