changeset 70417:95f3ef491663

(setenv): Use add-to-history.
author Kim F. Storm <storm@cua.dk>
date Fri, 05 May 2006 23:36:55 +0000
parents 522ce5c1839a
children 4e1a43edc7bc
files lisp/env.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/env.el	Fri May 05 23:36:32 2006 +0000
+++ b/lisp/env.el	Fri May 05 23:36:55 2006 +0000
@@ -117,7 +117,7 @@
      (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)