emacs: Fix clojure nesting

This commit is contained in:
Joseph Ferano 2025-11-17 09:27:33 +07:00
parent 95c69be2c6
commit 9cb8126a8c

View File

@ -2441,14 +2441,14 @@ This checks if its a ts mode then runs their counterparts.
(string= joe/cider-last-reported-exception error-str)))) (string= joe/cider-last-reported-exception error-str))))
(unless same-error-p (unless same-error-p
(setq joe/cider-last-reported-exception error-str) (setq joe/cider-last-reported-exception error-str)
(cider-interactive-eval "(throw @error-reporting/last-exception)"))) (cider-interactive-eval "(throw @error-reporting/last-exception)"))))
(defun joe/cider-repl-preoutput-hook (output) (defun joe/cider-repl-preoutput-hook (output)
(if (string-match "EMACS-CIDER-REPORT-EXCEPTION" output) (if (string-match "EMACS-CIDER-REPORT-EXCEPTION" output)
(progn (progn
(joe/clojure-cider-throw-last-error) (joe/clojure-cider-throw-last-error)
"") "")
output))) output))
(add-hook 'cider-repl-preoutput-hook #'joe/cider-repl-preoutput-hook) (add-hook 'cider-repl-preoutput-hook #'joe/cider-repl-preoutput-hook)