[elpa] master 592b692 07/19: Add defcustom for ivy-backward-delete-char

[Oleh Krehel]

branch: master
commit 592b692b61e320a13621961d60765899d2ccbe15
Author: Kevin <address@hidden>
Commit: Kevin <address@hidden>

    Add defcustom for ivy-backward-delete-char
---
 ivy.el |    8 ++++++--
 1 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/ivy.el b/ivy.el
index 2b7af6a..c2749c9 100644
--- a/ivy.el
+++ b/ivy.el
@@ -59,6 +59,10 @@ Set this to nil if you don't want the count."
   "Whether to wrap around after the first and last candidate."
   :type 'boolean)
 
+(defcustom ivy-backward-delete-char-function `(minibuffer-keyboard-quit)
+  "Function called when ivy-backward-delete-char throws an error."
+  :type 'function)
+
 ;;* User Visible
 ;;** Keymap
 (require 'delsel)
@@ -155,12 +159,12 @@ If the input is empty, select the previous history 
element instead."
 
 (defun ivy-backward-delete-char ()
   "Forward to `backward-delete-char'.
-On error (read-only), quit without selecting."
+On error (read-only), call ivy-backward-delete-char-function."
   (interactive)
   (condition-case nil
       (backward-delete-char 1)
     (error
-     (minibuffer-keyboard-quit))))
+     (eval ivy-backward-delete-char-function))))
 
 ;;** Entry Point
 (defun ivy-read (prompt collection