buffer-read-only)
(goto-char (point-min))
(while (not (eobp))
- (if (looking-at "\\( ?[0-9]+:\\)\\([ !]\\)\\(.+\\)")
+ (if (looking-at "\\( ?[0-9]+:\\)\\(.\\)\\(.+\\)")
(let ((channel (save-match-data
(riece-parse-identity (match-string 3)))))
(replace-match
(concat "\\1"
(if (member channel riece-unread-channels)
"!"
- " ")
+ "\\2")
"\\3"))))
(forward-line))))))