Make alias widget-visibility-value-create obsolete
* lisp/wid-edit.el (widget-visibility-value-create): Make compat alias obsolete.
This commit is contained in:
parent
5ab557be62
commit
fc450db226
1 changed files with 3 additions and 5 deletions
|
@ -3043,12 +3043,10 @@ The following properties have special meanings for this widget:
|
|||
:on "Hide"
|
||||
:off-glyph "right"
|
||||
:off "Show"
|
||||
:value-create 'widget-visibility-value-create
|
||||
:value-create 'widget-toggle-value-create
|
||||
:action 'widget-toggle-action
|
||||
:match (lambda (_widget _value) t))
|
||||
|
||||
(defalias 'widget-visibility-value-create 'widget-toggle-value-create)
|
||||
|
||||
;;; The `documentation-link' Widget.
|
||||
;;
|
||||
;; This is a helper widget for `documentation-string'.
|
||||
|
@ -4143,9 +4141,9 @@ is inline."
|
|||
(setq help-echo (funcall help-echo widget)))
|
||||
(if help-echo (message "%s" (eval help-echo)))))
|
||||
|
||||
;;; Obsolete.
|
||||
|
||||
(define-obsolete-function-alias 'widget-sublist #'seq-subseq "28.1")
|
||||
(define-obsolete-function-alias 'widget-visibility-value-create
|
||||
#'widget-toggle-value-create "29.1")
|
||||
|
||||
(provide 'wid-edit)
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue