syndicate-lang
/
syndicate-2017
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Logout; fix nav

This commit is contained in:
Tony Garnock-Jones 2016-12-06 18:05:15 +13:00
parent db0282ca72
commit 88ff347744
2 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
examples/webchat/htdocs/templates/nav-account.html
View File

@ -6,6 +6,8 @@
<div class="dropdown-menu dropdown-menu-right" area-labelledby="nav-account">
<button class="dropdown-item toggleInvisible"><i class="icon ion-checkmark dropdown-marginal" {{#locallyVisible}}hidden{{/locallyVisible}}></i>Be invisible</button>
<div class="dropdown-divider"></div>
<a class="dropdown-item" href="#/conversations">Conversations</a>
<div class="dropdown-divider"></div>
<a class="dropdown-item" href="#/permissions">Permissions...</a>
<div class="dropdown-divider"></div>
<a class="dropdown-item" href="#/questions">
@ -16,5 +18,7 @@
Request<span class="plural count{{myRequestCount}}">s</span> for others to answer</a>
<div class="dropdown-divider"></div>
<a class="dropdown-item" href="#/contacts">Manage contacts</a>
<div class="dropdown-divider"></div>
<a class="dropdown-item" href="/logout">Log out</a>
</div>
</li>

4
examples/webchat/server/pages.rkt
View File

@ -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"))