From: Bruno Haible <bruno@clisp.org>
Date: Thu, 12 Oct 2000 21:43:30 +0000 (+0000)
Subject: Escape trigraphs that could occur in translated strings.
X-Git-Tag: v0.10.36~218
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=398a9a05f3932d02312baf89859d41e05eaf92d4;p=thirdparty%2Fgettext.git

Escape trigraphs that could occur in translated strings.
---

diff --git a/intl/ChangeLog b/intl/ChangeLog
index 153adf21a..49963f2e0 100644
--- a/intl/ChangeLog
+++ b/intl/ChangeLog
@@ -1,3 +1,7 @@
+1998-10-20  Paul Eggert  <eggert@twinsun.com>
+
+	* po2tbl.sin: Escape trigraphs.
+
 2000-10-12  Bruno Haible  <haible@clisp.cons.org>
 
 	* finddomain.c: Remove unneeded includes.
diff --git a/intl/po2tbl.sin b/intl/po2tbl.sin
index b3bcca4d7..ee89f8b86 100644
--- a/intl/po2tbl.sin
+++ b/intl/po2tbl.sin
@@ -52,6 +52,8 @@ const struct _msg_ent _msg_tbl[] = {
 # We found a continuation line.  But before printing insert '\'.
   :a
   s/\(.*\)\(\n.*\)/\1\\\2/
+# Escape trigraphs.
+  s/[?][?]\([-=(/)'<!>]\)/?\\?\1/g
   P
 # We cannot use D here.
   s/.*\n\(.*\)/\1/
@@ -87,6 +89,8 @@ const struct _msg_ent _msg_tbl[] = {
   G
   s/\(.*\)\n\([0-9]*\)/\1, \2},/
   s/\(.*\)"$/\1/
+# Escape trigraphs.
+  s/[?][?]\([-=(/)'<!>]\)/?\\?\1/g
   p
 }
 #