* Makefile.am (EXTRA_DIST): Add liece.xbm and liece.xpm.

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

diff --git a/lisp/liece-nick.el b/lisp/liece-nick.el
index 247728d..570c47d 100644 (file)
--- a/lisp/liece-nick.el
+++ b/lisp/liece-nick.el
@@ -305,14 +305,10 @@
        (liece-nick-join user chnl)))))
 
 (defvar liece-nick-region-nicks nil)
-(defvar liece-nick-region-opers nil)
-(defvar liece-nick-region-voices nil)
 
 ;;;###liece-autoload
 (defun liece-nick-update-region ()
-  (setq liece-nick-region-nicks nil
-       liece-nick-region-opers nil
-       liece-nick-region-voices nil)
+  (setq liece-nick-region-nicks nil)
   (save-excursion
     (let (region nick)
       (if (not (region-active-p))
@@ -331,10 +327,6 @@
        (while (not (eobp))
          (setq nick (widget-value (widget-at (1+ (point)))))
          (push nick liece-nick-region-nicks)
-         (if (memq (char-after) '(?@ ?+))
-             (push nick liece-nick-region-voices))
-         (if (eq ?@ (char-after))
-             (push nick liece-nick-region-opers))
          (beginning-of-line 2))))))
 
 (defun liece-nick-add-buttons (start end)