remove unused code and reformat some comments in web.lisp file.

src/web.lisp

@@ -53,7 +53,6 @@
 	   `(,+forbidden+ (:content-type "text/plain") ("Denied")))
 	  ((uiop:file-exists-p (ritherdon-archive.config:database-name))
 	   `(,+service-unavailable+ (:location "/")))
-	  ;; (render #P"initial-setup.html" `(:token ,(auth:csrf-token))))
 	  (t (nera-db:init-db
 	      (lack.request:request-body-parameters ningle:*request*))
 	     ;; Redirect to /setup-complete?
@@ -66,12 +65,12 @@
 	(utils:set-alert "This feature has been disabled.")
 	(redirect "/"))
       (hermetic:auth (:logged-in)
-		    ;; Authorised (Logged in users can't sign-up).
+		    ;; Hermetic Authorised (Logged in users can't sign-up).
 		    (progn
 		      (utils:set-alert
 		       "You need to be signed out to create a new account.")
 		      (redirect "/dashboard"))
-		    ;; Not Authorised
+		    ;; Hermetic Not Authorised
 		    (let ((alert (utils:get-and-reset-alert)))
 		      (render "sign-up.html"
 			      `(:token ,(auth:csrf-token)