Skip to content

Commit

Permalink
Temporarily disable *e, *1, *2, *3 for Clojure 1.3 compatibility.
Browse files Browse the repository at this point in the history
  • Loading branch information
technomancy committed Oct 22, 2010
1 parent ec535fa commit 6056bdc
Show file tree
Hide file tree
Showing 2 changed files with 5 additions and 4 deletions.
7 changes: 4 additions & 3 deletions src/swank/commands/basic.clj
Original file line number Diff line number Diff line change
Expand Up @@ -70,9 +70,10 @@
(with-package-tracking
(let [[value last-form] (eval-region form)]
(when (and last-form (not (one-of? last-form '*1 '*2 '*3 '*e)))
(set! *3 *2)
(set! *2 *1)
(set! *1 value))
;; (set! *3 *2)
;; (set! *2 *1)
;; (set! *1 value)
)
(send-repl-results-to-emacs value)))))

(defslimefn eval-and-grab-output [string]
Expand Down
2 changes: 1 addition & 1 deletion src/swank/core.clj
Original file line number Diff line number Diff line change
Expand Up @@ -270,7 +270,7 @@ values."

:else
(do
(set! *e t)
;; (set! *e t)
(try
(sldb-debug
nil
Expand Down

0 comments on commit 6056bdc

Please sign in to comment.