From 689f439402b28c1bc9c31bf0d397df8ef04b5dd4 Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Thu, 2 Feb 2006 04:20:36 +0000
Subject: [PATCH] (multi-occur-in-matching-buffers): Fix prev change.

---
 lisp/replace.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/replace.el b/lisp/replace.el
index 8a17104c59..92b4be7fd7 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
-- 
2.20.1