emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/which-key 1e1b7cb 1/2: Remove some obsolete variables/f


From: ELPA Syncer
Subject: [elpa] externals/which-key 1e1b7cb 1/2: Remove some obsolete variables/functions
Date: Sat, 10 Jul 2021 21:57:17 -0400 (EDT)

branch: externals/which-key
commit 1e1b7cb6f0b17835876ce772e1bce9d43e7cafbb
Author: Justin Burkett <justin@burkett.cc>
Commit: Justin Burkett <justin@burkett.cc>

    Remove some obsolete variables/functions
---
 which-key.el | 29 -----------------------------
 1 file changed, 29 deletions(-)

diff --git a/which-key.el b/which-key.el
index ff0db27..a493557 100644
--- a/which-key.el
+++ b/which-key.el
@@ -140,16 +140,6 @@ remapped given the currently active keymaps."
   :group 'which-key
   :type 'boolean)
 
-(defvar which-key-key-replacement-alist nil)
-(make-obsolete-variable 'which-key-key-replacement-alist
-                        'which-key-replacement-alist "2016-11-21")
-(defvar which-key-description-replacement-alist nil)
-(make-obsolete-variable 'which-key-description-replacement-alist
-                        'which-key-replacement-alist "2016-11-21")
-(defvar which-key-key-based-description-replacement-alist nil)
-(make-obsolete-variable 'which-key-key-based-description-replacement-alist
-                        'which-key-replacement-alist "2016-11-21")
-
 (defcustom which-key-replacement-alist
   (delq nil
         `(((nil . "which-key-show-next-page-no-cycle") . (nil . "wk next pg"))
@@ -666,9 +656,6 @@ update.")
                   "select-window" "switch-frame" "-state"
                   "which-key"))))
 
-(make-obsolete-variable 'which-key-prefix-name-alist nil "2016-10-05")
-(make-obsolete-variable 'which-key-prefix-title-alist nil "2016-10-05")
-
 (defvar which-key--pages-obj nil)
 (cl-defstruct which-key--pages
   pages
@@ -1008,22 +995,6 @@ addition KEY-SEQUENCE REPLACEMENT pairs) to apply."
 (put 'which-key-add-major-mode-key-based-replacements
      'lisp-indent-function 'defun)
 
-(defalias 'which-key-add-prefix-title 'which-key-add-key-based-replacements)
-(make-obsolete 'which-key-add-prefix-title
-               'which-key-add-key-based-replacements
-               "2016-10-05")
-
-(defalias 'which-key-declare-prefixes 'which-key-add-key-based-replacements)
-(make-obsolete 'which-key-declare-prefixes
-               'which-key-add-key-based-replacements
-               "2016-10-05")
-
-(defalias 'which-key-declare-prefixes-for-mode
-  'which-key-add-major-mode-key-based-replacements)
-(make-obsolete 'which-key-declare-prefixes-for-mode
-               'which-key-add-major-mode-key-based-replacements
-               "2016-10-05")
-
 (defun which-key-define-key-recursively (map key def &optional at-root)
   "Recursively bind KEY in MAP to DEF on every level of MAP except the first.
 If AT-ROOT is non-nil the binding is also placed at the root of MAP."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]