(if (string-match "^\\([^ ]+\\) " string)
(let* ((channel (substring string (match-end 0)))
(user (match-string 1 string))
(channel-identity (riece-make-identity channel riece-server-name))
(buffer (riece-channel-buffer channel-identity)))
(if (string-match "^\\([^ ]+\\) " string)
(let* ((channel (substring string (match-end 0)))
(user (match-string 1 string))
(channel-identity (riece-make-identity channel riece-server-name))
(buffer (riece-channel-buffer channel-identity)))