From: Stefan Monnier <monnier@iro.umontreal.ca>
Date: Sat, 23 May 2015 16:05:47 +0000 (-0400)
Subject: * lisp/progmodes/xref.el (xref-find-apropos): Use read-string.
X-Git-Tag: emacs-25.0.90~2001
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8994590317556a15be6bbb9a5c15227ceda189db;p=emacs.git

* lisp/progmodes/xref.el (xref-find-apropos): Use read-string.
---

diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index ef46e34e78f..3bb4fde0d0c 100644
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -676,9 +676,9 @@ With prefix argument, prompt for the identifier."
 (defun xref-find-apropos (pattern)
   "Find all meaningful symbols that match PATTERN.
 The argument has the same meaning as in `apropos'."
-  (interactive (list (read-from-minibuffer
+  (interactive (list (read-string
                       "Search for pattern (word list or regexp): "
-                      nil nil nil 'xref--read-pattern-history)))
+                      nil 'xref--read-pattern-history)))
   (require 'apropos)
   (xref--show-xrefs pattern 'apropos
                     (apropos-parse-pattern