From b1612cf3f3673f43e798a39e30ed47bf9053ab01 Mon Sep 17 00:00:00 2001 From: Ludovic Courtès Date: Wed, 13 Jan 2016 10:00:58 +0100 Subject: Set the text domain and the location of message catalogs. * src/guile/skribilo/config.in (skribilo-locale-directory): New procedure. * src/guile/skribilo/utils/syntax.scm (%skribilo-text-domain): Export. * src/guile/skribilo.scm (skribilo): Add calls to 'bindtextdomain' and 'textdomain'. * substitute.am (substitute): Add 'localedir'. --- src/guile/skribilo.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'src/guile/skribilo.scm') diff --git a/src/guile/skribilo.scm b/src/guile/skribilo.scm index 0c45b92..1014d8d 100644 --- a/src/guile/skribilo.scm +++ b/src/guile/skribilo.scm @@ -1,7 +1,7 @@ ;;; skribilo.scm -- The Skribilo document processor. ;;; ;;; Copyright 2005, 2006, 2007, 2008, 2009, 2011, 2012, 2013, -;;; 2015 Ludovic Courtès +;;; 2015, 2016 Ludovic Courtès ;;; Copyright 2003, 2004 Erick Gallesio - I3S-CNRS/ESSI ;;; ;;; @@ -321,6 +321,10 @@ options." (_ "warning: failed to install locale: ~a~%") (strerror (system-error-errno args))))) + ;; Tell gettext where to look for message catalogs. + (bindtextdomain %skribilo-text-domain (skribilo-locale-directory)) + (textdomain %skribilo-text-domain) + (let* ((options (parse-args args)) (reader-name (string->symbol (assoc-ref options :reader))) -- cgit v1.2.3