branch: elpa/multiple-cursors
commit 374244b66e1612d8313eb4c48760b2725ae19a4d
Author: Magnar Sveen <[email protected]>
Commit: Magnar Sveen <[email protected]>
Add support for C-s and C-r when phi-search is installed
---
multiple-cursors-core.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/multiple-cursors-core.el b/multiple-cursors-core.el
index 886d86d..b6ab255 100644
--- a/multiple-cursors-core.el
+++ b/multiple-cursors-core.el
@@ -402,7 +402,9 @@ multiple cursors editing.")
(define-key mc/keymap (kbd "C-g") 'mc/keyboard-quit)
(define-key mc/keymap (kbd "<return>") 'multiple-cursors-mode)
(when (fboundp 'phi-search)
- (define-key mc/keymap (kbd "C-s") 'phi-search)))
+ (define-key mc/keymap (kbd "C-s") 'phi-search))
+ (when (fboundp 'phi-search-backward)
+ (define-key mc/keymap (kbd "C-r") 'phi-search-backward)))
(defun mc--all-equal (entries)
"Are all these entries equal?"
