*Backtrace*

_ riece-message-filter-functions

川´3`) が邪魔くさいので invisible にしてみた。

(add-hook 'riece-message-filter-functions 'riece-trimming-message-filter)
(defun riece-trimming-message-filter (message)
  (let ((text (riece-message-text message)))
    (when (string-match "^川´3`)" text)
      (put-text-property (match-beginning 0) (match-end 0)
			 'invisible 'riece-trimming
			 (riece-message-text message)))
    message))

riece-ignore とは微妙に違うから、同じ filter につっこむのは美しくない。 trimming って名前も微妙だ。