1 files changed, 3 insertions, 3 deletions

diff --git a/src/db.lisp b/src/db.lisp
index 8fab0db..b0159c0 100644
--- a/src/db.lisp
+++ b/src/db.lisp
@@ -29,13 +29,13 @@
   (case type
     (:blacklisted 0)
     (:whitelisted 1)
-    (t (error "Unknown inline bot type ~S" type))))
+    (otherwise (error "Unknown inline bot type ~S" type))))
 
 (defun integer->inline-bot-type (num)
   (case num
     (0 :blacklisted)
     (1 :whitelisted)
-    (t (error "Unknown inline bot type value ~S" num))))
+    (otherwise (error "Unknown inline bot type value ~S" num))))
 
 (defun upgrade (db)
   (execute-non-query db "CREATE TABLE IF NOT EXISTS version(id INTEGER PRIMARY KEY, version INTEGER)")
@@ -81,4 +81,4 @@ VALUES (?, 'blacklisted'), (?, 'whitelisted')"
 CREATE TABLE inline_bots (
   id INTEGER PRIMARY KEY,
   type INTEGER REFERENCES inline_bots_enum(id))"))
-    (t (error "Unreachable upgrade step reached ~A" new-version))))
+    (otherwise (error "Unreachable upgrade step reached ~A" new-version))))