|
@@ -75,10 +75,10 @@
|
|
|
(require 'slime) (require 'swank-clojure)
|
|
|
(with-temp-buffer
|
|
|
(insert (org-babel-expand-body:clojure body params))
|
|
|
- (read
|
|
|
+ ((lambda (result) (condition-case nil (read result) (error result)))
|
|
|
(slime-eval
|
|
|
`(swank:interactive-eval-region
|
|
|
- ,(buffer-substring-no-properties (point-min) (point-max)))
|
|
|
+ ,(buffer-substring-no-properties (point-min) (point-max)))
|
|
|
(cdr (assoc :package params))))))
|
|
|
|
|
|
(provide 'ob-clojure)
|