(multi-occur-in-matching-buffers): Fix prev change.

1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/replace.el b/lisp/replace.el
index 8a17104c599..92b4be7fd7b 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1004,7 +1004,7 @@ See also `multi-occur'."
     (let* ((default (car regexp-history))
            (input
             (read-from-minibuffer
-             (if allbufs
+             (if current-prefix-arg
                  "List lines in buffers whose names match regexp: "
                "List lines in buffers whose filenames match regexp: ")
              nil
@@ -1016,7 +1016,7 @@ See also `multi-occur'."
         input))
     (occur-read-primary-args)))
   (when bufregexp
-    (occur-1 regexp nlines
+    (occur-1 regexp nil
              (delq nil
                    (mapcar (lambda (buf)
                              (when (if allbufs