aboutsummaryrefslogtreecommitdiff
path: root/module/calp/html/view/calendar
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2022-10-14 21:08:16 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2022-10-16 23:28:34 +0200
commit78fd74622dca5f2def261506c3f8d4c0a940a6c4 (patch)
tree87b8362454c759b680fe566229b5adbc3f25e712 /module/calp/html/view/calendar
parentChange NOTE to TODO. (diff)
downloadcalp-78fd74622dca5f2def261506c3f8d4c0a940a6c4.tar.gz
calp-78fd74622dca5f2def261506c3f8d4c0a940a6c4.tar.xz
Change gettext '_' to 'G_'.
Guile 3 reserves _ for other stuff.
Diffstat (limited to 'module/calp/html/view/calendar')
-rw-r--r--module/calp/html/view/calendar/shared.scm2
-rw-r--r--module/calp/html/view/calendar/week.scm4
2 files changed, 3 insertions, 3 deletions
diff --git a/module/calp/html/view/calendar/shared.scm b/module/calp/html/view/calendar/shared.scm
index 4779d11b..413bb5f5 100644
--- a/module/calp/html/view/calendar/shared.scm
+++ b/module/calp/html/view/calendar/shared.scm
@@ -36,7 +36,7 @@
(unless event-length-key
(scm-error 'wrong-type-arg "fix-event-widths!"
- (_ "event-length-key is required")
+ (G_ "event-length-key is required")
#f #f))
;; @var{x} is how for left in the container we are.
diff --git a/module/calp/html/view/calendar/week.scm b/module/calp/html/view/calendar/week.scm
index caad8912..44898b0d 100644
--- a/module/calp/html/view/calendar/week.scm
+++ b/module/calp/html/view/calendar/week.scm
@@ -36,7 +36,7 @@
;; Top left area
(div (@ (class "week-indicator"))
(span (@ (style "font-size: 50%"))
- ,(_ "v."))
+ ,(G_ "v."))
,@(->> (week-number start-date)
number->string string->list
(map (lambda (c) `(span ,(string c))))))
@@ -49,7 +49,7 @@
,@(map (lambda (day-date)
`(div (@ (class "meta"))
(span (@ (class "daydate"))
- ,(date->string day-date (_ "~Y-~m-~d")))
+ ,(date->string day-date (G_ "~Y-~m-~d")))
(span (@ (class "dayname"))
;; TODO translation here?
,(string-titlecase (date->string day-date "~a")))))