[elpa] externals/dape bf91567e5e 105/123: Move dape-config `fn' evaluation into none interactive part of dape

[ELPA Syncer]

branch: externals/dape
commit bf91567e5e81b15c5179609cb520ce8d3318ed54
Author: Daniel Pettersson <dan...@dpettersson.net>
Commit: Daniel Pettersson <dan...@dpettersson.net>

    Move dape-config `fn' evaluation into none interactive part of dape
---
 dape.el | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/dape.el b/dape.el
index 6c66c6fd40..d7410899a7 100644
--- a/dape.el
+++ b/dape.el
@@ -1512,6 +1512,8 @@ Use SKIP-COMPILE to skip compilation."
               (with-current-buffer buffer
                 (let ((inhibit-read-only t))
                   (erase-buffer)))))
+          (when-let ((fn (plist-get config 'fn)))
+            (setq config (funcall fn (copy-tree config))))
           (cond
            ((and (not skip-compile) (plist-get config 'compile))
             (dape--compile config))
@@ -2767,9 +2769,6 @@ See `dape--config-mode-p' how \"valid\" is defined."
                                               nil 'dape-history 
initial-contents))
                    (`(,key ,config) (dape--config-from-string
                                      (substring-no-properties str)))
-                   (config (if-let ((fn (plist-get config 'fn)))
-                               (funcall fn config)
-                             config))
                    (evaled-config (dape--config-eval key config)))
         (setq dape-session-history
               (cons (dape--config-to-string key evaled-config)