diff options
author | Eli Zaretskii <eliz@gnu.org> | 2021-11-03 20:13:04 +0200 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2021-11-03 20:13:04 +0200 |
commit | d8523060e5dcf285a5468377720bed6a34599df6 (patch) | |
tree | 3ab86de175baa447f4da18929b8f1bf010f13d4b /lisp/outline.el | |
parent | 5152727530a6ce8ec401fd138fbecbea9a68bc24 (diff) | |
download | emacs-d8523060e5dcf285a5468377720bed6a34599df6.tar.gz emacs-d8523060e5dcf285a5468377720bed6a34599df6.tar.bz2 emacs-d8523060e5dcf285a5468377720bed6a34599df6.zip |
Fix widgets in Outline mode on TTY frames
* lisp/outline.el (outline--valid-emoji-p): Don't try to probe
support for display of Emoji characters on TTY frames. (Bug#51578)
Diffstat (limited to 'lisp/outline.el')
-rw-r--r-- | lisp/outline.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/outline.el b/lisp/outline.el index 2a6f475a0db..5b20a42c97b 100644 --- a/lisp/outline.el +++ b/lisp/outline.el @@ -961,7 +961,8 @@ If non-nil, EVENT should be a mouse event." " " (buffer-substring (point) (1+ (point)))))) (defun outline--valid-emoji-p (string) - (when-let ((font (car (internal-char-font nil ?😀)))) + (when-let ((font (and (display-multi-font-p) + (car (internal-char-font nil ?😀))))) (font-has-char-p font (aref string 0)))) (defun outline--valid-char-p (string) |