X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=mudsync%2Fnetworking.scm;h=e72820628f352e2a83ddcd582b1caad00177e40d;hb=HEAD;hp=33ad424f3234c497f01e8de21bf0580bad128af0;hpb=6f7c1d4f9a2043c16f83facef6b3216e45e14f40;p=mudsync.git diff --git a/mudsync/networking.scm b/mudsync/networking.scm index 33ad424..e728206 100644 --- a/mudsync/networking.scm +++ b/mudsync/networking.scm @@ -1,5 +1,5 @@ ;;; Mudsync --- Live hackable MUD -;;; Copyright © 2016-2017 Christopher Allan Webber +;;; Copyright © 2016-2017 Christine Lemmer-Webber ;;; ;;; This file is part of Mudsync. ;;; @@ -249,7 +249,11 @@ like the web one" ;; (p (b "") " Last one!")) )) (div (@ (id "input-metabox")) - (input (@ (id "main-input")))))) + (input (@ (id "main-input"))) + " " + (span (@ (id "connection-status") + (class "disconnected")) + "[disconnected]")))) (define (main-tmpl) `(html (@ (xmlns "http://www.w3.org/1999/xhtml"))