summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJonas Bernoulli <jonas@bernoul.li>2024-06-23 19:53:19 +0200
committerJonas Bernoulli <jonas@bernoul.li>2024-06-23 19:53:19 +0200
commit3141aa0e0adb394518b6cbfdd0cfead9e0dbd64c (patch)
tree8f4c851986ae16bca1f0f1ab4cd82af8f99bff5b
parentf5157d615238eb17e62f45eefe921002c6340366 (diff)
server-visit-files@: Fix removal from file-name-history
The entries in `file-name-history' were passed through `abbreviate-file-name', so we have to do the same here. Closes https://github.com/magit/magit/issues/5159.
-rw-r--r--lisp/with-editor.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/with-editor.el b/lisp/with-editor.el
index a49349a..c7d7436 100644
--- a/lisp/with-editor.el
+++ b/lisp/with-editor.el
@@ -720,7 +720,8 @@ are prevented from being added to that list."
(when (cl-find-if (lambda (regexp)
(string-match-p regexp file))
with-editor-file-name-history-exclude)
- (setq file-name-history (delete file file-name-history)))))
+ (setq file-name-history
+ (delete (abbreviate-file-name file) file-name-history)))))
;;; Augmentations