diff --git a/emacs/.emacs.d/wpc/irc.el b/emacs/.emacs.d/wpc/irc.el
index 1a9120456..08e4d1eb1 100644
--- a/emacs/.emacs.d/wpc/irc.el
+++ b/emacs/.emacs.d/wpc/irc.el
@@ -30,8 +30,6 @@
 ;; Configuration
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
-(defconst irc-enable-tests? t
-  "When t, run the tests defined herein.")
 
 (setq erc-rename-buffers t)
 
@@ -171,13 +169,5 @@
 ;; Tests
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
-(when irc-enable-tests?
-  (prelude-assert
-   (equal
-    (irc-channel->server `(("irc.dairy.com" . ,(cycle-new "#cheese" "#milk"))
-                           ("irc.color.com" . ,(cycle-new "#red" "#blue")))
-                         "#cheese")
-    "irc.dairy.com")))
-
 (provide 'irc)
 ;;; irc.el ends here