aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/util/parse-cal-path.scm
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/vcomponent/util/parse-cal-path.scm
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 '')
-rw-r--r--module/vcomponent/util/parse-cal-path.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/module/vcomponent/util/parse-cal-path.scm b/module/vcomponent/util/parse-cal-path.scm
index cf03db88..24eee04e 100644
--- a/module/vcomponent/util/parse-cal-path.scm
+++ b/module/vcomponent/util/parse-cal-path.scm
@@ -21,14 +21,14 @@
(set! (prop comp '-X-HNH-SOURCETYPE) 'file)
comp) ]
[(directory)
- (report-time! (_ "Parsing ~a") path)
+ (report-time! (G_ "Parsing ~a") path)
(let ((comp (parse-vdir path)))
(set! (prop comp '-X-HNH-SOURCETYPE) 'vdir
(prop comp '-X-HNH-DIRECTORY) path)
comp)]
[(block-special char-special fifo socket unknown symlink)
=> (lambda (t) (scm-error 'misc-error "parse-cal-path"
- (_ "Can't parse file of type ~s")
+ (G_ "Can't parse file of type ~s")
(list t)
#f))]))