(if flag
(unless (riece-identity-assoc user users t)
(riece-channel-set-users channel (cons (list user) users)))
(if flag
(unless (riece-identity-assoc user users t)
(riece-channel-set-users channel (cons (list user) users)))
(riece-channel-set-users channel (delq user users))))))
(defun riece-channel-toggle-operator (name user flag)
(riece-channel-set-users channel (delq user users))))))
(defun riece-channel-toggle-operator (name user flag)