[nongnu] elpa/multiple-cursors 72b4bf3 329/434: Enable to specify search word in mc/mark-all-in-region

[ELPA Syncer]

branch: elpa/multiple-cursors
commit 72b4bf3911cc18e87a80b2152a6f707d12f2b531
Author: uk-ar <yuuki.ari@gmail.com>
Commit: uk-ar <yuuki.ari@gmail.com>

    Enable to specify search word in mc/mark-all-in-region
---
 mc-mark-more.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mc-mark-more.el b/mc-mark-more.el
index 45a87fc..445f6d3 100644
--- a/mc-mark-more.el
+++ b/mc-mark-more.el
@@ -271,10 +271,10 @@ With zero ARG, skip the last one and mark next."
     (mc/mark-all-like-this)))
 
 ;;;###autoload
-(defun mc/mark-all-in-region (beg end)
+(defun mc/mark-all-in-region (beg end &optional search)
   "Find and mark all the parts in the region matching the given search"
   (interactive "r")
-  (let ((search (read-from-minibuffer "Mark all in region: "))
+  (let ((search (or search (read-from-minibuffer "Mark all in region: ")))
         (case-fold-search nil))
     (if (string= search "")
         (message "Mark aborted")