about summary refs log tree commit diff
path: root/emacs/.emacs.d/wpc/irc.el
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/.emacs.d/wpc/irc.el')
-rw-r--r--emacs/.emacs.d/wpc/irc.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/emacs/.emacs.d/wpc/irc.el b/emacs/.emacs.d/wpc/irc.el
index ce0e5ffcb952..1787c8566f17 100644
--- a/emacs/.emacs.d/wpc/irc.el
+++ b/emacs/.emacs.d/wpc/irc.el
@@ -45,7 +45,7 @@
 ;; TODO: Assert that no two servers have a channel with the same name. We need
 ;; this because that's the assumption that underpins the `irc/channel->server'
 ;; function. This will probably be an O(n^2) operation.
-(prelude/assert
+(prelude-assert
  (set/distinct? (set/from-list
                  (cycle/to-list
                   (alist/get "irc.freenode.net"
@@ -59,7 +59,7 @@
   "Resolve an IRC server from a given CHANNEL."
   (let ((result (alist/find (lambda (k v) (cycle/contains? channel v))
                             server->channels)))
-    (prelude/assert (maybe-some? result))
+    (prelude-assert (maybe-some? result))
     result))
 
 (defun irc/channel->cycle (server->channels channel)
@@ -166,7 +166,7 @@
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 
 (when irc/enable-tests?
-  (prelude/assert
+  (prelude-assert
    (equal
     (irc/channel->server `(("irc.dairy.com" . ,(cycle/new "#cheese" "#milk"))
                            ("irc.color.com" . ,(cycle/new "#red" "#blue")))