aboutsummaryrefslogtreecommitdiff
path: root/src/guile/skribilo/engine/info.scm
diff options
context:
space:
mode:
Diffstat (limited to 'src/guile/skribilo/engine/info.scm')
-rw-r--r--src/guile/skribilo/engine/info.scm8
1 files changed, 4 insertions, 4 deletions
diff --git a/src/guile/skribilo/engine/info.scm b/src/guile/skribilo/engine/info.scm
index ce448d9..13ba77c 100644
--- a/src/guile/skribilo/engine/info.scm
+++ b/src/guile/skribilo/engine/info.scm
@@ -1,7 +1,7 @@
;;; info.scm -- GNU Info engine.
;;; -*- coding: iso-8859-1 -*-
;;;
-;;; Copyright 2008, 2009, 2012, 2015 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright 2008, 2009, 2012, 2015, 2018 Ludovic Courtès <ludo@gnu.org>
;;; Copyright 2001, 2002 Manuel Serrano
;;;
;;;
@@ -174,10 +174,10 @@
(begin
(skribe-warning/ast 1 section
(format #f
- (_ "Info node title '~A' already used")
+ (G_ "Info node title '~A' already used")
title))
(skribe-warning/ast 1 (cdr same-named)
- (_ "previous occurrence was here"))
+ (G_ "previous occurrence was here"))
section+title)
(alist-cons title section section+title))))
'()
@@ -806,7 +806,7 @@
(string? (markup-option n :file)))
:action (lambda (n e)
(if (markup-option n :url)
- (skribe-warning/ast 1 n (_ "image URLs are not supported"))
+ (skribe-warning/ast 1 n (G_ "image URLs are not supported"))
(let ((f (let ((f (markup-option n :file)))
(convert-image f '("png" "gif" "jpg"))))
(h (markup-option n :height))