Make emacsclient add abbreviated file names to file-name-history

* lisp/server.el (server-visit-files): Use
'file-name-history--add' to add the visited files to history.
(Bug#60097)
This commit is contained in:
Eli Zaretskii 2022-12-19 15:33:09 +02:00
parent b3e7768a0e
commit a75d1da911

View file

@ -1495,7 +1495,7 @@ so don't mark these buffers specially, just visit them normally."
minibuffer-auto-raise))
(filen (car file))
(obuf (get-file-buffer filen)))
(add-to-history 'file-name-history filen)
(file-name-history--add filen)
(if (null obuf)
(progn
(run-hooks 'pre-command-hook)