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

(setenv): Use add-to-history.
---

diff --git a/lisp/env.el b/lisp/env.el
index 1b6c038cbea..5a3de0ac712 100644
--- a/lisp/env.el
+++ b/lisp/env.el
@@ -117,7 +117,7 @@ a side-effect."
      (let* ((var (read-envvar-name "Set environment variable: " nil))
 	    (value (getenv var)))
        (when value
-	 (push value setenv-history))
+	 (add-to-history 'setenv-history value))
        ;; Here finally we specify the args to give call setenv with.
        (list var
 	     (read-from-minibuffer (format "Set %s to value: " var)