[Emacs-diffs] Changes to emacs/lisp/progmodes/grep.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/03/20 19:57:01

Index: progmodes/grep.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/progmodes/grep.el,v
retrieving revision 1.88
retrieving revision 1.89
diff -u -b -r1.88 -r1.89
--- progmodes/grep.el   5 Mar 2008 04:09:23 -0000       1.88
+++ progmodes/grep.el   20 Mar 2008 19:56:57 -0000      1.89
@@ -644,10 +644,9 @@
    (progn
      (grep-compute-defaults)
      (let ((default (grep-default-command)))
-       (list (read-from-minibuffer "Run grep (like this): "
-                                  (if current-prefix-arg
-                                      default grep-command)
-                                  nil nil 'grep-history
+       (list (read-shell-command "Run grep (like this): "
+                                 (if current-prefix-arg default grep-command)
+                                 'grep-history
                                   (if current-prefix-arg nil default))))))
 
   ;; Setting process-setup-function makes exit-message-function work
@@ -671,9 +670,8 @@
    (progn
      (grep-compute-defaults)
      (if grep-find-command
-        (list (read-from-minibuffer "Run find (like this): "
-                                    grep-find-command nil nil
-                                     'grep-find-history))
+        (list (read-shell-command "Run find (like this): "
+                                   grep-find-command 'grep-find-history))
        ;; No default was set
        (read-string
         "compile.el: No `grep-find-command' command available. Press RET.")