From: Mark Wooding <mdw@distorted.org.uk>
Date: Tue, 14 May 2024 02:03:11 +0000 (+0100)
Subject: dot/ercrc.el: Add another wide character.
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/profile/commitdiff_plain/7d7cb6320bb71cc3c8a004e23219e4e85aed42ea?ds=inline

dot/ercrc.el: Add another wide character.
---

diff --git a/dot/ercrc.el b/dot/ercrc.el
index a0bc5a6..6a708ac 100644
--- a/dot/ercrc.el
+++ b/dot/ercrc.el
@@ -22,7 +22,8 @@ (defun mdw-replace-wide-characters (string)
       (while (< i (length string))
 	(let ((ch (aref string i)))
 	  (cond ((and (= (char-width ch) 1)
-		      (not (or (<= #x1f200 ch #x1ffff))))
+		      (not (or (<= #x1f200 ch #x1ffff)
+			       (= ch #x2693))))
 		 (when state (princ "*]") (setf state nil))
 		 (write-char ch))
 		(t