ld/multiple-cursors.el
1
0
Fork 0
mirror of https://github.com/magnars/multiple-cursors.el.git synced 2025-10-13 21:03:05 +00:00
Code Issues Packages Projects Releases Wiki Activity

Merge pull request #192 from uk-ar/add_search_word

Browse Source 
Enable to specify search word in mc/mark-all-in-region
This commit is contained in:
Magnar Sveen 2015-05-24 11:19:34 +02:00
commit 66b1127489
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
mc-mark-more.el
View File

@ -275,10 +275,10 @@ With zero ARG, skip the last one and mark next."
(mc/mark-all-like-this))) (mc/mark-all-like-this)))
;;;###autoload ;;;###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" "Find and mark all the parts in the region matching the given search"
(interactive "r") (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)) (case-fold-search nil))
(if (string= search "") (if (string= search "")
(message "Mark aborted") (message "Mark aborted")