]> git.donarmstrong.com Git - lilypond.git/commitdiff
Quickly fix German macros.itexi
authorJohn Mandereau <john.mandereau@gmail.com>
Sun, 24 Jun 2007 11:57:30 +0000 (13:57 +0200)
committerJohn Mandereau <john.mandereau@gmail.com>
Sun, 24 Jun 2007 11:57:30 +0000 (13:57 +0200)
German quotes are not yet supported by texinfo.tex; this will be fixed
when ec* fonts are used.

Documentation/de/user/macros.itexi

index 6aa222e3139d91969e190e7a8ba135c1aabda32b..295a4689f823d5884f1893e8949691d2e5a4c1c1 100644 (file)
@@ -250,63 +250,26 @@ internals document, @internalsref{\NAME\}
 user manual, @internalsref{\NAME\}
 @end macro
 
+@c ecrm char codes
+@c but texinfo.tex uses cm
+@c FIXME
 @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}}
+\gdef\glq{\char015\relax}%
+\gdef\grq{\char140\relax}%
+\gdef\glqq{\char022\relax}%
+\gdef\grqq{\char020\relax}%
 @end tex
 
-@c to get decent quotes in `foo'
+@c to get decent German quotes in `foo'
+@c FIXME: use glq/grq
 @macro q{TEXT}
-@glq\TEXT\@grq
+`\TEXT\'
 @end macro
 
-@c to get decent quotes in ``foo''
+@c to get decent German quotes in ``foo''
+@c FIXME: use glqq/grqq
 @macro qq{TEXT}
-@glqq\TEXT\@grqq
+``\TEXT\''
 @end macro
 
 @end iftex