ivy.el (ivy-do-completion-in-region): New defcustom

Fixes #367

diff --git a/ivy.el b/ivy.el
index 9e4a88e589785f47aca38052a7409570dcdd2eba..a5da0264a54a94d8b9ecf99a4aa6c4fa8b092c7f 100644 (file)
--- a/ivy.el
+++ b/ivy.el
@@ -1457,6 +1457,10 @@ The previous string is between `ivy-completion-beg' and `ivy-completion-end'."
                      :require-match t)
            t))))))
 
+(defcustom ivy-do-completion-in-region t
+  "When non-nil `ivy-mode' will set `completion-in-region-function'."
+  :type 'boolean)
+
 ;;;###autoload
 (define-minor-mode ivy-mode
   "Toggle Ivy mode on or off.
@@ -1476,7 +1480,8 @@ Minibuffer bindings:
   (if ivy-mode
       (progn
         (setq completing-read-function 'ivy-completing-read)
-        (setq completion-in-region-function 'ivy-completion-in-region))
+        (when ivy-do-completion-in-region
+          (setq completion-in-region-function 'ivy-completion-in-region)))
     (setq completing-read-function 'completing-read-default)
     (setq completion-in-region-function 'completion--in-region)))