andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Suppress warning about obsolete function custom-show

Browse source 
* lisp/cus-edit.el (custom-variable-value-create): Suppress
warning about obsolete function custom-show.  The widget this
supports has been obsolete since Emacs 24, but we should perhaps
be very conservative about removing widget types, so suppress the
warning instead of removing the widget type.
This commit is contained in:
Lars Ingebrigtsen 2019-06-12 16:33:00 +02:00
parent a5cc98c38e
commit 669ca75059
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/cus-edit.el
View file

@ -2570,7 +2570,8 @@ try matching its doc string against `custom-guess-doc-alist'."
;; If we don't know the state, see if we need to edit it in lisp form.
(unless state
(setq state (if (custom-show type value) 'unknown 'hidden)))
(with-suppressed-warnings ((obsolete custom-show))
(setq state (if (custom-show type value) 'unknown 'hidden))))
(when (eq state 'unknown)
(unless (widget-apply conv :match value)
(setq form 'mismatch)))