branch: elpa/multiple-cursors
commit 66b1127489d56d1f07ee9395899b269b798d08b3
Merge: 533e157 72b4bf3
Author: Magnar Sveen <[email protected]>
Commit: Magnar Sveen <[email protected]>
Merge pull request #192 from uk-ar/add_search_word
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 eed0035..5f73d8e 100644
--- a/mc-mark-more.el
+++ b/mc-mark-more.el
@@ -275,10 +275,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")
