Synch up with liece-2_0.

[elisp/liece.git] / lisp / liece-nick.el

diff --git a/lisp/liece-nick.el b/lisp/liece-nick.el
index 570c47d..93dfe51 100644 (file)
--- a/lisp/liece-nick.el
+++ b/lisp/liece-nick.el
@@ -88,7 +88,7 @@
 (defmacro liece-nick-add-mode (mode &optional nick)
   "Add MODE as char to NICK."
   `(let* ((n (intern ,nick liece-obarray))
-         (modes (string-to-char-list (or (get n 'mode) ""))))
+         (modes (liece-string-to-list (or (get n 'mode) ""))))
      (put n 'mode (mapconcat #'char-to-string
                             (or (memq ,mode modes)
                                 (cons ,mode modes)) ""))))
@@ -96,7 +96,7 @@
 (defmacro liece-nick-remove-mode (mode &optional nick)
   "Remove MODE as char to NICK."
   `(let* ((n (intern ,nick liece-obarray))
-         (modes (string-to-char-list (or (get n 'mode) ""))))
+         (modes (liece-string-to-list (or (get n 'mode) ""))))
      (delq ,mode modes)
      (put n 'mode (mapconcat #'char-to-string modes ""))))