diff options
| author | colin <colin@cicadas.surf> | 2023-04-01 18:04:45 -0700 |
|---|---|---|
| committer | colin <colin@cicadas.surf> | 2023-04-01 18:04:45 -0700 |
| commit | 2b6e1eec2bf5c27223fbf2d09cd10a322fc09909 (patch) | |
| tree | d26e6b1b945864bcde8ecb9b2cb7cb1caf277d29 /src/player.lisp | |
| parent | a73b31c1ca88d0cba7365e648e3da70c4124f27e (diff) | |
Add: I dunno. lots of little thingsmini-marathon
Diffstat (limited to 'src/player.lisp')
| -rw-r--r-- | src/player.lisp | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/player.lisp b/src/player.lisp index 6533f59..965812f 100644 --- a/src/player.lisp +++ b/src/player.lisp @@ -81,9 +81,9 @@ (with-html (:option :value (uid player) (nickname player)))) -(defrender :checkbox ((player player)) +(defrender :checkbox ((player player) (name "PLAYER")) (with-html - (:input :type "checkbox" :id (uid player) :name "POSSIBLE-SEER" :value (uid player)) + (:input :type "checkbox" :id (uid player) :name name :value (uid player)) (:label :for (uid player) (nickname player)))) (defrender :list-item ((player player)) @@ -94,8 +94,7 @@ (render :inline player)) (defrender :inline ((player player)) - (with-html (:a :href (urlpath player) (nickname player))) - ) + (with-html (:a :href (urlpath player) (nickname player)))) ;;; PAGES & PAGE CLASSES |