Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

special case dss/eval-defun in clojure

  • Loading branch information...
commit 605352bf0d24d2a46f2d5fb999860df48d4ffffb 1 parent dad46f5
@tavisrudd authored
Showing with 5 additions and 1 deletion.
  1. +5 −1 dss-codenav-helpers.el
View
6 dss-codenav-helpers.el
@@ -174,7 +174,11 @@ Do nothing if not in string."
(dss/indent-defun)
(save-excursion
(dss/out-sexp nil t)
- (eval-last-sexp nil)))
+ (cond ((or (equal major-mode 'clojure-mode)
+ (equal major-mode 'slime-repl-mode))
+ (slime-eval-last-expression))
+ (t (eval-last-sexp nil)))
+ ))
;; (message "%S" (preceding-sexp))

0 comments on commit 605352b

Please sign in to comment.
Something went wrong with that request. Please try again.