changeset 70421:47fe68ac1971

(lgrep, rgrep): Use add-to-history.
author Kim F. Storm <storm@cua.dk>
date Fri, 05 May 2006 23:38:18 +0000
parents 718312081ce0
children 84417eaa098c
files lisp/progmodes/grep.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/grep.el	Fri May 05 23:37:55 2006 +0000
+++ b/lisp/progmodes/grep.el	Fri May 05 23:38:18 2006 +0000
@@ -676,7 +676,7 @@
 	      (setq command
 		    (read-from-minibuffer "Confirm: "
 					  command nil nil 'grep-history))
-	    (push command grep-history))))
+	    (add-to-history 'grep-history command))))
       (when command
 	;; Setting process-setup-function makes exit-message-function work
 	;; even when async processes aren't supported.
@@ -742,7 +742,7 @@
 	      (setq command
 		    (read-from-minibuffer "Confirm: "
 					  command nil nil 'grep-find-history))
-	    (push command grep-find-history))
+	    (add-to-history 'grep-find-history command))
 	  (compilation-start command 'grep-mode))))))