diff options
Diffstat (limited to 'module/calp/html/view')
| -rw-r--r-- | module/calp/html/view/calendar.scm | 3 | ||||
| -rw-r--r-- | module/calp/html/view/calendar/week.scm | 2 |
2 files changed, 0 insertions, 5 deletions
diff --git a/module/calp/html/view/calendar.scm b/module/calp/html/view/calendar.scm index a6ebdfba..705fa42a 100644 --- a/module/calp/html/view/calendar.scm +++ b/module/calp/html/view/calendar.scm @@ -91,9 +91,7 @@ (content "width=device-width, initial-scale=0.5"))) (meta (@ (name description) (content ,(format #f (_ "Calendar for the dates between ~a and ~a") - ;; start date metainfo (date->string start-date (_ "~Y-~m-~d")) - ;; end date metainfo (date->string end-date (_ "~Y-~m-~d")))))) ;; NOTE this is only for the time actually part of this calendar. ;; overflowing times from pre-start and post-end is currently ignored here. @@ -155,7 +153,6 @@ window.default_calendar='~a';" (footer (@ (style "grid-area: footer")) (span ,(_ "Page generated ") - ;; Generation data ,(date->string (current-date) (_ "~Y-~m-~d"))) (span ,(_ "Current time ") (current-time (@ (interval 1)))) (span (a (@ (href ,(repo-url))) diff --git a/module/calp/html/view/calendar/week.scm b/module/calp/html/view/calendar/week.scm index ed3f00ec..78abcfbf 100644 --- a/module/calp/html/view/calendar/week.scm +++ b/module/calp/html/view/calendar/week.scm @@ -34,7 +34,6 @@ ;; Top left area (div (@ (class "week-indicator")) (span (@ (style "font-size: 50%")) - ;; Week number prefix ,(_ "v.")) ,@(->> (week-number start-date) number->string string->list @@ -48,7 +47,6 @@ ,@(map (lambda (day-date) `(div (@ (class "meta")) (span (@ (class "daydate")) - ;; Week view header format ,(date->string day-date (_ "~Y-~m-~d"))) (span (@ (class "dayname")) ;; TODO translation here? |