changeset 70420:718312081ce0

(server-visit-files): Use add-to-history.
author Kim F. Storm <storm@cua.dk>
date Fri, 05 May 2006 23:37:55 +0000
parents c18be7440465
children 47fe68ac1971
files lisp/server.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/server.el	Fri May 05 23:37:37 2006 +0000
+++ b/lisp/server.el	Fri May 05 23:37:55 2006 +0000
@@ -411,7 +411,7 @@
 	;; deleted file, offer to write it.
 	(let* ((filen (car file))
 	       (obuf (get-file-buffer filen)))
-	  (push filen file-name-history)
+	  (add-to-history 'file-name-history filen)
 	  (if (and obuf (set-buffer obuf))
 	      (progn
 		(cond ((file-exists-p filen)