dot/ercrc.el: Add another wide character.
authorMark Wooding <mdw@distorted.org.uk>
Tue, 14 May 2024 02:03:11 +0000 (03:03 +0100)
committerMark Wooding <mdw@distorted.org.uk>
Tue, 14 May 2024 02:05:34 +0000 (03:05 +0100)
dot/ercrc.el

index a0bc5a6..6a708ac 100644 (file)
@@ -22,7 +22,8 @@
       (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