diff --git a/pg-sessions.lisp b/pg-sessions.lisp
index 1db7573..19250b7 100644
--- a/pg-sessions.lisp
+++ b/pg-sessions.lisp
@@ -215,11 +215,3 @@ SESSION \(the default is the current session) if it exists."
            (,%symbol ,symbol))
        (setf (slot-value ,%session ,%symbol) ,new-value)
        (save-pg-session ,%session))))
-
-;; (defun reset-sessions (&optional (acceptor *acceptor*))
-;;   "Removes ALL stored sessions of ACCEPTOR."
-;;   (with-session-lock-held ((session-db-lock acceptor))
-;;     (loop for (nil . session) in (session-db acceptor)
-;;           do (acceptor-remove-session acceptor session))
-;;     (setq *session-db* nil))
-;;   (values))