From 88ff347744a1402b39471b454d00734434acd7bd Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Tue, 6 Dec 2016 18:05:15 +1300 Subject: [PATCH] Logout; fix nav --- examples/webchat/htdocs/templates/nav-account.html | 4 ++++ examples/webchat/server/pages.rkt | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/examples/webchat/htdocs/templates/nav-account.html b/examples/webchat/htdocs/templates/nav-account.html index 15e672e..dacdfa3 100644 --- a/examples/webchat/htdocs/templates/nav-account.html +++ b/examples/webchat/htdocs/templates/nav-account.html @@ -6,6 +6,8 @@ diff --git a/examples/webchat/server/pages.rkt b/examples/webchat/server/pages.rkt index ebe70a9..71ebf2c 100644 --- a/examples/webchat/server/pages.rkt +++ b/examples/webchat/server/pages.rkt @@ -19,7 +19,7 @@ (define (page #:head [extra-head '()] #:body-id [body-id #f] - #:nav-heading [nav-heading `(a ((href "/#/conversations")) "Syndicate Webchat")] + ;; #:nav-heading [nav-heading `(a ((href "/#/conversations")) "Syndicate Webchat")] title . body-elements) `(html ((lang "en")) (head (meta ((charset "utf-8"))) @@ -60,7 +60,7 @@ (div ((class "container")) (div ((class "header clearfix")) (nav ((class "navbar bg-faded")) - (span ((id "nav-heading") (class "navbar-brand text-muted")) ,nav-heading) + ;; (span ((id "nav-heading") (class "navbar-brand text-muted")) ,nav-heading) (ul ((id "nav-ul") (class "nav navbar-nav nav-pills float-xs-right")) ;; (li ((class "nav-item")) (a ((class "nav-link active") (href "#")) "Home " (span ((class "sr-only")) "(current)"))) ;; (li ((class "nav-item")) (a ((class "nav-link") (href "#")) "About"))