From c1980bd1896447230caf029f5542a358b5fddcbf Mon Sep 17 00:00:00 2001 From: chpill Date: Tue, 14 May 2024 15:15:39 +0200 Subject: [PATCH] Fix cider-interactive-eval-override invocation --- CHANGELOG.md | 1 + cider-eval.el | 6 +++++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/CHANGELOG.md b/CHANGELOG.md index 8f30fe8eb..910d818f9 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -30,6 +30,7 @@ ### Bugs fixed - [#3600](https://github.com/clojure-emacs/cider/pull/3600): Fix scittle jack-in when using `cider-jack-in-clj`. +- [#3663](https://github.com/clojure-emacs/cider/issues/3663): Fix `cider-interactive-eval-override` invocation. ## 1.13.1 (2024-02-01) diff --git a/cider-eval.el b/cider-eval.el index df66414f5..2f0083e23 100644 --- a/cider-eval.el +++ b/cider-eval.el @@ -1229,7 +1229,11 @@ arguments and only proceed with evaluation if it returns nil." (delete-overlay ov)))) (unless (and cider-interactive-eval-override (functionp cider-interactive-eval-override) - (funcall cider-interactive-eval-override form callback bounds)) + (condition-case _ + (funcall cider-interactive-eval-override form callback bounds additional-params) + (wrong-number-of-arguments + ;; fallback for backward compatibility + (funcall cider-interactive-eval-override form callback bounds)))) (cider-map-repls :auto (lambda (connection) (cider--prep-interactive-eval form connection)