[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 63a12ffbc37: Avoid signaling errors in emoji.el
From: |
Eli Zaretskii |
Subject: |
master 63a12ffbc37: Avoid signaling errors in emoji.el |
Date: |
Sat, 27 Jan 2024 08:53:20 -0500 (EST) |
branch: master
commit 63a12ffbc37e46d2752b3903228fc8ec2c1fc611
Author: Eshel Yaron <me@eshelyaron.com>
Commit: Eli Zaretskii <eliz@gnu.org>
Avoid signaling errors in emoji.el
* lisp/international/emoji.el (emoji--read-emoji): Signal
user-error on empty input (bug#68671).
---
lisp/international/emoji.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/lisp/international/emoji.el b/lisp/international/emoji.el
index 3a191c5ecd3..4f3aab5a6be 100644
--- a/lisp/international/emoji.el
+++ b/lisp/international/emoji.el
@@ -683,11 +683,12 @@ We prefer the earliest unique letter."
strings))))
(complete-with-action action table string pred)))
nil t)))
- (when (cl-plusp (length name))
- (let ((glyph (if emoji-alternate-names
- (cadr (split-string name "\t"))
- (gethash name emoji--all-bases))))
- (cons glyph (gethash glyph emoji--derived))))))
+ (if (cl-plusp (length name))
+ (let ((glyph (if emoji-alternate-names
+ (cadr (split-string name "\t"))
+ (gethash name emoji--all-bases))))
+ (cons glyph (gethash glyph emoji--derived)))
+ (user-error "You didn't specify an emoji"))))
(defvar-keymap emoji-zoom-map
"+" #'emoji-zoom-increase
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 63a12ffbc37: Avoid signaling errors in emoji.el,
Eli Zaretskii <=