]> code.delx.au - gnu-emacs-elpa/commitdiff
swiper.el (swiper-mc): Restore interactive
authorOleh Krehel <ohwoeowho@gmail.com>
Fri, 15 Apr 2016 16:59:23 +0000 (18:59 +0200)
committerOleh Krehel <ohwoeowho@gmail.com>
Fri, 15 Apr 2016 17:01:08 +0000 (19:01 +0200)
The command is bound in `swiper-map'.
Add a warning for when it's called via "M-x", since it's not supposed to
be called that way.

swiper.el

index 90e25b5f39c200e0aef2549d8648ea5bfecee2a9..349c3d4c158c7facf4a83b9ae6d02064fd830829 100644 (file)
--- a/swiper.el
+++ b/swiper.el
 (declare-function multiple-cursors-mode "ext:multiple-cursors-core")
 
 (defun swiper-mc ()
+  "Create a fake cursor for each `swiper' candidate."
+  (interactive)
   (unless (require 'multiple-cursors nil t)
     (error "multiple-cursors isn't installed"))
+  (unless (window-minibuffer-p)
+    (error "Call me only from `swiper'"))
   (let ((cands (nreverse ivy--old-cands)))
     (unless (string= ivy-text "")
       (ivy-exit-with-action