diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-04-26 19:15:40 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-04-26 19:21:01 +0200 |
| commit | b9ef4eb2faa38ff1592d3e252d6835fe9bc5c036 (patch) | |
| tree | 42f11d26c2fd59aa42573e0d27837dd7c96de5af /module/output | |
| parent | Text event CSS better generalized. (diff) | |
| download | calp-b9ef4eb2faa38ff1592d3e252d6835fe9bc5c036.tar.gz calp-b9ef4eb2faa38ff1592d3e252d6835fe9bc5c036.tar.xz | |
Made .btn own css class.
Diffstat (limited to 'module/output')
| -rw-r--r-- | module/output/html.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/module/output/html.scm b/module/output/html.scm index b62b106a..6b2849ad 100644 --- a/module/output/html.scm +++ b/module/output/html.scm @@ -649,7 +649,8 @@ ;; Small calendar and navigation (nav (@ (class "calnav") (style "grid-area: nav")) (div (@ (class "change-view")) - (a (@ (href "/week/" ,(date->string + (a (@ (class "btn") + (href "/week/" ,(date->string (if (= 1 (day start-date)) (start-of-week start-date (get-config 'week-start)) start-date) @@ -658,7 +659,8 @@ "weekly") - (a (@ (href "/month/" ,(date->string (set (day start-date) 1) "~1") + (a (@ (class "btn") + (href "/month/" ,(date->string (set (day start-date) 1) "~1") ".html")) "monthly"))) |