mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-27 18:30:47 -08:00
tooltip-mode does in exist in emacs-nox #120
This commit is contained in:
parent
9883acc887
commit
df41a62dc8
1 changed files with 6 additions and 3 deletions
|
|
@ -1354,11 +1354,14 @@ ORIGINAL-DESCRIPTION is the description given by
|
|||
(local 'which-key-local-map-description-face)
|
||||
(t 'which-key-command-description-face))
|
||||
'help-echo (cond
|
||||
((and (fboundp (intern original-description))
|
||||
((and original-description
|
||||
(fboundp (intern original-description))
|
||||
(documentation (intern original-description))
|
||||
tooltip-mode)
|
||||
;; tooltip-mode doesn't exist in emacs-nox
|
||||
(boundp 'tooltip-mode) tooltip-mode)
|
||||
(documentation (intern original-description)))
|
||||
((and (fboundp (intern original-description))
|
||||
((and original-description
|
||||
(fboundp (intern original-description))
|
||||
(documentation (intern original-description))
|
||||
(let* ((doc (documentation (intern original-description)))
|
||||
(str (replace-regexp-in-string "\n" " " doc))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue