init.el

;; ERC
(require 'znc)

(require 'todochiku)

(defun highlight-me (match-type nick message)
  (unless (posix-string-match "^\\** Users on #" message)
    (todochiku-message 
     (concat "ERC: Highlight on " (buffer-name (current-buffer)))
     (concat "<" (first (split-string nick "!")) "> " message)
     "")))

(add-hook 'erc-text-matched-hook 'highlight-me)
(add-hook 'erc-text-matched-hook 'erc-beep-on-match)

(setq erc-track-exclude-types 
      '("JOIN" "NICK" "PART" "QUIT" "MODE" "KICK"
        "324" "329" "332" "333" "353" "477"))

(setq erc-track-switch-direction 'newest)