From dd81a3170e758d1467018805f67a49dc82c6f196 Mon Sep 17 00:00:00 2001
From: John Mandereau <john.mandereau@gmail.com>
Date: Thu, 26 Jul 2007 09:00:05 +0200
Subject: [PATCH] Use correct French and German quotes in PDF manuals

Thin spaces should be used with French guillemets, but texinfo.tex
does not support it (yet).
---
 Documentation/de/user/macros.itexi | 60 ++----------------------------
 Documentation/fr/user/macros.itexi |  4 +-
 2 files changed, 6 insertions(+), 58 deletions(-)

diff --git a/Documentation/de/user/macros.itexi b/Documentation/de/user/macros.itexi
index bf7aa7ac00..638ece7ce4 100644
--- a/Documentation/de/user/macros.itexi
+++ b/Documentation/de/user/macros.itexi
@@ -250,66 +250,14 @@ internals document, @internalsref{\NAME\}
 user manual, @internalsref{\NAME\}
 @end macro
 
-@ignore
-@tex
-% from german.sty
-\def\allowhyphens{%
-  \penalty\@M
-  \hskip\z@skip}
-
-\gdef\set@low@box#1{%
-  \setbox\tw@\hbox{,}%
-  \setbox\z@\hbox{#1}%
-  \setbox\z@\hbox{%
-    \dimen@\ht\z@
-    \advance\dimen@ -\ht\tw@
-    \lower\dimen@\box\z@}%
-  \ht\z@\ht\tw@
-  \dp\z@\dp\tw@}
-
-\gdef\save@sf@q#1{%
-  {\ifhmode
-     \edef\@SF{\spacefactor\the\spacefactor}%
-   \else
-     \let\@SF\empty
-   \fi
-   \leavevmode #1
-   \@SF}}
-
-\gdef\glq{%
-  \save@sf@q{%
-    \set@low@box{'\/}%
-    \box\z@
-    \kern-.04em
-    \allowhyphens}}
-\gdef\grq{%
-  \save@sf@q{%
-    \kern-.0125em
-    `%
-    \kern.07em}}
-\gdef\glqq{%
-  \save@sf@q{%
-    \set@low@box{''\/}%
-    \box\z@
-    \kern-.04em
-    \allowhyphens}}
-\gdef\grqq{%
-  \save@sf@q{%
-    \kern-.07em
-    ``%
-    \kern.07em}}
-@end tex
-@end ignore
-
-@c FIXME
-@c to get decent quotes in `foo'
+@c to get decent German quotes in `foo'
 @macro q{TEXT}
-`\TEXT\'
+@quotesinglbase{}\TEXT\`
 @end macro
 
-@c to get decent quotes in ``foo''
+@c to get decent German quotes in ``foo''
 @macro qq{TEXT}
-``\TEXT\''
+@quotedblbase{}\TEXT\``
 @end macro
 
 @end iftex
diff --git a/Documentation/fr/user/macros.itexi b/Documentation/fr/user/macros.itexi
index aefd73f6bd..c4bfa969c4 100644
--- a/Documentation/fr/user/macros.itexi
+++ b/Documentation/fr/user/macros.itexi
@@ -250,14 +250,14 @@ internals document, @internalsref{\NAME\}
 user manual, @internalsref{\NAME\}
 @end macro
 
-@c to get decent quotes in `foo'
+@c to get decent French quotes in `foo'
 @macro q{TEXT}
 `\TEXT\'
 @end macro
 
 @c to get decent French quotes in ``foo''
 @macro qq{TEXT}
-``\TEXT\''
+@guillemetleft{}@tie{}\TEXT\@tie{}@guillemetright{}
 @end macro
 
 @end iftex
-- 
2.39.5