mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-20 20:07:36 +00:00
; Finish recent rename of completion-* predicates.
This commit is contained in:
parent
06f8407ee6
commit
cccd701ac9
1 changed files with 1 additions and 1 deletions
|
|
@ -434,7 +434,7 @@ Value is a pair of positions (START . END) if there is a non-nil
|
|||
|
||||
(defun shr-show-alt-text ()
|
||||
"Show the ALT text of the image under point."
|
||||
(declare (completion (lambda (_ b) (completion-button-p 'shr b))))
|
||||
(declare (completion (lambda (_ b) (command-completion-button-p 'shr b))))
|
||||
(interactive)
|
||||
(let ((text (get-text-property (point) 'shr-alt)))
|
||||
(if (not text)
|
||||
|
|
|
|||
Loading…
Reference in a new issue