From: Kim F. Storm <storm@cua.dk>
Date: Fri, 5 May 2006 23:37:55 +0000 (+0000)
Subject: (server-visit-files): Use add-to-history.
X-Git-Tag: emacs-pretest-22.0.90~2777
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c398358aee8359d7b63621a35cda5110bc99f81b;p=emacs.git

(server-visit-files): Use add-to-history.
---

diff --git a/lisp/server.el b/lisp/server.el
index befcd22ad3a..43b2dc63389 100644
--- a/lisp/server.el
+++ b/lisp/server.el
@@ -411,7 +411,7 @@ so don't mark these buffers specially, just visit them normally."
 	;; 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)