[elpa] externals/ivy-hydra 98c61de 299/395: ivy.el (ivy-set-display-transformer): Mark obsolete

[Basil L. Contovounesios]

branch: externals/ivy-hydra
commit 98c61dec812c3a3f227e71a59e004d2d90593130
Author: Oleh Krehel <ohwoeowho@gmail.com>
Commit: Oleh Krehel <ohwoeowho@gmail.com>

    ivy.el (ivy-set-display-transformer): Mark obsolete
    
    Use `ivy-configure' :display-transformer-fn instead.
    
    * ivy.el (ivy--display-transformers-alist): Rename.
    
    * targets/obsolete-config.el: Update.
---
 ivy.el                     | 10 +++++-----
 targets/obsolete-config.el |  1 +
 2 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/ivy.el b/ivy.el
index 9d2640d..ac8e133 100644
--- a/ivy.el
+++ b/ivy.el
@@ -228,7 +228,7 @@ PROMPT-FN is a function of no arguments that returns a 
prompt string."
   (setq ivy--prompts-list
         (plist-put ivy--prompts-list caller prompt-fn)))
 
-(defvar ivy--display-transformers-list nil
+(defvar ivy--display-transformers-alist nil
   "A list of str->str transformers per command.")
 
 (defun ivy-set-display-transformer (cmd transformer)
@@ -240,8 +240,8 @@ plus some extra information.
 
 This lambda is called only on the `ivy-height' candidates that
 are about to be displayed, not on the whole collection."
-  (setq ivy--display-transformers-list
-        (plist-put ivy--display-transformers-list cmd transformer)))
+  (declare (obsolete "Use `ivy-configure' :display-transformer-fn" 
"<2020-05-20 Wed>"))
+  (ivy--alist-set 'ivy--display-transformers-alist cmd transformer))
 
 (defvar ivy--sources-list nil
   "A list of extra sources per command.")
@@ -1888,7 +1888,7 @@ An :init is a function with no arguments.
   (when display-fn
     (ivy--alist-set 'ivy-display-functions-alist caller display-fn))
   (when display-transformer-fn
-    (ivy-set-display-transformer caller display-transformer-fn))
+    (ivy--alist-set 'ivy--display-transformers-alist caller 
display-transformer-fn))
   (when alt-done-fn
     (ivy--alist-set 'ivy-alt-done-functions-alist caller alt-done-fn))
   (when more-chars
@@ -2088,7 +2088,7 @@ customizations apply to the current completion session."
            :re-builder re-builder
            :matcher matcher
            :dynamic-collection dynamic-collection
-           :display-transformer-fn (plist-get ivy--display-transformers-list 
caller)
+           :display-transformer-fn (ivy-alist-setting 
ivy--display-transformers-alist caller)
            :directory default-directory
            :extra-props extra-props
            :caller caller
diff --git a/targets/obsolete-config.el b/targets/obsolete-config.el
index d38c7da..3e8b783 100644
--- a/targets/obsolete-config.el
+++ b/targets/obsolete-config.el
@@ -1,3 +1,4 @@
 (add-to-list 'load-path default-directory)
 (require 'counsel)
+(ivy-set-display-transformer 'ivy-switch-buffer 'ivy-switch-buffer-transformer)
 (byte-compile-file (expand-file-name "targets/obsolete-config.el"))