From 12662d6a0fceb0c2adfdc4d0947800994bc85718 Mon Sep 17 00:00:00 2001
From: shoshin <shoshin@cicadas.surf>
Date: Mon, 13 Mar 2023 21:52:18 -0500
Subject: Add: minor tweaks, player list item view in adventure

---
 src/endpoints.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/endpoints.lisp')

diff --git a/src/endpoints.lisp b/src/endpoints.lisp
index 096603a..62d70ee 100644
--- a/src/endpoints.lisp
+++ b/src/endpoints.lisp
@@ -119,7 +119,7 @@ functions in url parameters in endpoint definitions."
 	 :path "/" :domain "localhost")  ; TODO: generalize domain
 	(redirect-to "/tavern"))
       (progn
-        (flash :tavern-door nick)
+        (flash :tavern-door (format nil "Hrmm... ~a you say? It ain't on the register." nick))
         (redirect-to "/tavern-door"))))  )
 
 (defendpoint* :get "/join" () ()
-- 
cgit v1.2.3