summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorSean Whitton <spwhitton@spwhitton.name>2023-06-16 15:47:28 +0100
committerSean Whitton <spwhitton@spwhitton.name>2023-06-16 15:56:14 +0100
commitd7b42b1204c159bafd31f4d8bee4162c73c5c017 (patch)
tree5419fa793aca6ba98a819b28f532b70150cb8a94
parent4fccb74891367417f44ca75087103faee3cfde73 (diff)
downloaddotfiles-d7b42b1204c159bafd31f4d8bee4162c73c5c017.tar.gz
interactive-form already handles checking the symbol property
-rw-r--r--.emacs.d/init.el4
1 files changed, 1 insertions, 3 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 75653ca7..1cfa2319 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -2827,9 +2827,7 @@ Called by '~/src/dotfiles/bin/emacsclient --spw/update-environment'."
(t (intern (completing-read "GUD command: "
'(gdb perldb pdb) nil t)))))
(args
- (advice-eval-interactive-spec
- (cadr
- (or (get cmd 'interactive-form) (interactive-form cmd))))))
+ (advice-eval-interactive-spec (cadr (interactive-form cmd)))))
(when (buffer-live-p gud-comint-buffer)
(when-let ((proc (get-buffer-process gud-comint-buffer)))
(set-process-query-on-exit-flag proc nil))