diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2019-04-26 10:43:17 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-04-26 10:43:17 +0200 |
| commit | d0d5dd92a4065dc03626e27e78f5469bb25aeebe (patch) | |
| tree | fee6e95baa1220cd0fcbff17ce0010969ae630f7 | |
| parent | Remove weird file helper. (diff) | |
| download | calp-d0d5dd92a4065dc03626e27e78f5469bb25aeebe.tar.gz calp-d0d5dd92a4065dc03626e27e78f5469bb25aeebe.tar.xz | |
Made HTML day headers better.
| -rw-r--r-- | module/output/html.scm | 5 | ||||
| -rw-r--r-- | static/style.css | 14 |
2 files changed, 15 insertions, 4 deletions
diff --git a/module/output/html.scm b/module/output/html.scm index 851f9b54..f72122bb 100644 --- a/module/output/html.scm +++ b/module/output/html.scm @@ -84,8 +84,9 @@ (fix-event-widths! (date->time-utc date) (stream->list events)) `(div (@ (class "day")) (div (@ (class "meta")) - (span (@ (class "dayname")) ,(date->string date "~a")) - (span (@ (class "daydate")) ,(date->string date "~Y-~m-~d"))) + ,(let ((str (date->string date "~Y-~m-~d"))) + `(span (@ (id ,str) (class "daydate")) ,str)) + (span (@ (class "dayname")) ,(date->string date "~a"))) (div (@ (class "events")) ,@(map (lambda (time) `(div (@ (class "clock " diff --git a/static/style.css b/static/style.css index f20b9430..3c3e7e9d 100644 --- a/static/style.css +++ b/static/style.css @@ -90,11 +90,21 @@ .meta { height: 50px; width: 100%; - + display: flex; + justify-content: center; + align-items: center; + position: relative; } .meta .dayname { - font-size: 2em; + position: absolute; + left: 5; + top: 2; + color: grey; +} + +.meta .daydate { + font-size: 200%; } .event { |