dot/ercrc.el: Add another wide character.
[profile] / 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