diff options
| -rw-r--r-- | with-editor.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/with-editor.el b/with-editor.el index fa01a9d..f2269b1 100644 --- a/with-editor.el +++ b/with-editor.el @@ -541,7 +541,8 @@ which may or may not insert the text into the PROCESS' buffer." (defun server-visit-files--with-editor-file-name-history-exclude (files _proc &optional _nowait) - (pcase-dolist (`(,file _) files) + (dolist (file files) + (setq file (car file)) (when (--any (string-match-p it file) with-editor-file-name-history-exclude) (setq file-name-history (delete file file-name-history))))) |