       '(("localhost" :nick "pjones")
         ("irc.freenode.net" :channels ("#xmonad" "#derailed" "#mpd"
                                        "#conkeror" "#debian" "#emacs"
-                                       "#haskell" "#gnus"))))
+                                       "#haskell" "#gnus" "#hakyll"
+                                       "#haskell-mobile"))))
 
 (setq rcirc-authinfo
       `(("freenode"  nickserv "pmade"  ,freenode-password)

    "#haskell@irc.freenode.net")
  "A list of rcirc buffer names in the order in which they should
be placed into the current set of windows.")

(defun pjones:rcirc-windows ()
  "Split the current frame into several windows and place the

(defun pjones:rcirc-hook ()
  (require 'rcirc-color)
  (when (and (string-match "#" (buffer-name))
             (not (string-match "developers\\|twitter" (buffer-name)))
             (not (member (buffer-name) pjones:rcirc-low-traffic-channels)))
    (setq rcirc-ignore-buffer-activity-flag t)
    (rcirc-omit-mode))
  (define-key rcirc-mode-map (kbd "C-c C-o") 'rcirc-browse-url)
