]> git.donarmstrong.com Git - lilypond.git/commitdiff
Use correct French and German quotes in PDF manuals
authorJohn Mandereau <john.mandereau@gmail.com>
Thu, 26 Jul 2007 07:00:05 +0000 (09:00 +0200)
committerJohn Mandereau <john.mandereau@gmail.com>
Thu, 26 Jul 2007 07:00:05 +0000 (09:00 +0200)
Thin spaces should be used with French guillemets, but texinfo.tex
does not support it (yet).

Documentation/de/user/macros.itexi
Documentation/fr/user/macros.itexi

index bf7aa7ac00e586c43321b6afb2ff1ed8e80ee2ae..638ece7ce439572d271def34132ab8f2eb61554f 100644 (file)
@@ -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
index aefd73f6bdb1c3d51ea30f395add12785ba83622..c4bfa969c411194eed667d8785180b1712bc229c 100644 (file)
@@ -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