Add user pages on the website.
This commit is contained in:
parent
77393fe452
commit
6a360173fd
9
main.rkt
9
main.rkt
|
@ -81,6 +81,10 @@
|
|||
("list" weblet pages:notepad:page-list)
|
||||
("show/{page}" matching-weblet pages:notepad:page-show)
|
||||
)
|
||||
("user" symlink "/user/list"
|
||||
("list" weblet pages:notepad:user-list)
|
||||
("show/{name}" matching-weblet pages:notepad:user-show)
|
||||
)
|
||||
))
|
||||
; Sitemap
|
||||
(sitemap
|
||||
|
@ -116,7 +120,10 @@
|
|||
("Vraie citation" "/ArnYtron3000/vraie" #t)
|
||||
("À propos d'ArnYtron3000" "/ArnYtron3000/About" #t)
|
||||
)
|
||||
("Bloc-Note" "/notes" #t
|
||||
("Bloc-Note" "/notes/list" #t
|
||||
(#f "/notes/show" #f)
|
||||
("Utilisateurs" "/user/list" #t)
|
||||
(#f "/user/show" #f)
|
||||
)
|
||||
)
|
||||
; Webcontainer
|
||||
|
|
Loading…
Reference in New Issue