[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
scratch/emoji 7d49e5d: Fix init problem
From: |
Lars Ingebrigtsen |
Subject: |
scratch/emoji 7d49e5d: Fix init problem |
Date: |
Tue, 26 Oct 2021 14:52:28 -0400 (EDT) |
branch: scratch/emoji
commit 7d49e5d3ffec8c98a35767b026f1e42b588737f6
Author: Lars Ingebrigtsen <larsi@gnus.org>
Commit: Lars Ingebrigtsen <larsi@gnus.org>
Fix init problem
---
lisp/play/emoji.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/play/emoji.el b/lisp/play/emoji.el
index 23b0a16..1f631fd 100644
--- a/lisp/play/emoji.el
+++ b/lisp/play/emoji.el
@@ -37,8 +37,8 @@
(setq transient-use-variable-pitch t)
;; Remove debugging.
(unless (and nil emoji--labels)
- (emoji--parse-labels)
(setq emoji--variants (make-hash-table :test #'equal))
+ (emoji--parse-labels)
(emoji--parse-normal-variants)
(emoji--parse-zwj-variants)
(emoji--define-transient))
@@ -98,7 +98,7 @@
(setf (gethash base table) (list glyph))
;; Add variants to the base.
(unless (gethash base table)
- (let ((char (gethash (upcase base) ucs-names)))
+ (let ((char (gethash (upcase base) (ucs-names))))
;; FIXME -- These are things like "man lifting weights".
;;(unless char (message "No %s in `ucs-names'" base))
(setf (gethash base table) (list char))))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- scratch/emoji 7d49e5d: Fix init problem,
Lars Ingebrigtsen <=