1
Fork 0
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:
Chen Bin 2016-05-07 14:19:23 +10:00
parent 9883acc887
commit df41a62dc8

View file

@ -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))