[elpa] externals/ivy-posframe ca2b6db 106/195: add disable mode code

[Feng Shu]

branch: externals/ivy-posframe
commit ca2b6db344ce7dac308d172a6993c0e27f86b6c2
Author: conao3 <conao3@gmail.com>
Commit: conao3 <conao3@gmail.com>

    add disable mode code
---
 ivy-posframe.el | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/ivy-posframe.el b/ivy-posframe.el
index a150473..63ce72b 100644
--- a/ivy-posframe.el
+++ b/ivy-posframe.el
@@ -466,7 +466,12 @@ selection, non-nil otherwise."
          `(progn
             (mapcar (lambda (elm) `(push `(,elm :cleanup ivy-posframe-cleanup) 
ivy-display-functions-props)) fncs)
             (mapcar (lambda (elm) `(advice-add ',(car elm) :around #',(cdr 
elm))) vars)
-            (mapcar (lambda (elm) `(define-key ,(nth 0 elm) ,(nth 1 elm) 
',(nth 2 elm)) keys)))))))
+            (mapcar (lambda (elm) `(define-key ,(nth 0 elm) ,(nth 1 elm) 
',(nth 2 elm)) keys))))
+      (eval
+       `(progn
+          (mapcar (lambda (elm) `(push `(,elm :cleanup ignore) 
ivy-display-functions-props)) fncs)
+          (mapcar (lambda (elm) `(advice-remove ',(car elm) #',(cdr elm))) 
vars)
+          (mapcar (lambda (elm) `(define-key ,(nth 0 elm) ,(nth 1 elm) nil) 
keys)))))))
 
 ;;;###autoload
 (defun ivy-posframe-demo ()