Revert "Quickly fix German macros.itexi"

[lilypond.git] / Documentation / de / user / macros.itexi

@c -*- coding: utf-8; mode: texinfo; -*-

@c **** all formats ****

@macro refbugs
@noindent
@subsubheading Bugs

@end macro

@macro moreinfo
@subheading More information

@end macro

@macro seealso
@noindent
@subsubheading See also

@end macro

@macro refcommands
@noindent
@subsubheading Predefined commands

@end macro

@macro context{NAME}
@vindex \NAME\
@code{\NAME\}@c should use internalsref
@end macro

@macro refcommand{WHAT}
@vindex \WHAT\
@code{\WHAT\}
@end macro

@macro commonprop
@noindent
@subsubheading Commonly tweaked properties

@end macro

@macro funindex {WORD}
@findex \WORD\
@kindex \WORD\
@end macro



@c  *** Macros with variable output ***

@c usage: @lsr{ancient,custodes.ly}
@macro lsr{DIR,NAME}
@ifhtml
  @uref{source/input/lsr/\DIR\/collated-files.html#\NAME\,@file{\DIR\/\NAME\}}
@end ifhtml
@ifnothtml
  @file{\DIR\/\NAME\}
@end ifnothtml
@end macro

@macro lsrdir{DIR}
@ifhtml
  @uref{source/input/lsr/\DIR\/collated-files.html,@file{\DIR\}}
@end ifhtml
@ifnothtml
  @file{\DIR\}
@end ifnothtml
@end macro




@macro arrow{}
@iftex
@tex $\\Rightarrow$ @end tex@c
@end iftex
@ifhtml
@html
→
@end html
@end ifhtml
@ifinfo
-->
@end ifinfo
@end macro


@c we need this since @q{\} doesn't work with makeinfo 4.8 --
@c say @q{@value{backslash}} instead
@set backslash \


@ifhtml
@c ***** HTML *****

@c makeinfo-4.7 encodes html names, which means that nodes that
@c contain nonalphanum characters will be broken links on the website.
@c @uref{../lilypond-internals/\NAME\.html,\NAME\}@c
@c @inforef{} adds ``See'' to the sentence, which is annoying, but
@c better than a broken link.
@c @inforef{\NAME\,,lilypond-internals}@c
@c using @ref without punctuation is OK without for formats other than info

@ifset bigpage

@macro internalsref{NAME}
@vindex \NAME\
@ref{\NAME\,,,lilypond-internals-big-page}
@end macro

@macro rglos{NAME}
@vindex \NAME\
@ref{\NAME\,,,music-glossary-big-page}
@end macro

@end ifset


@ifclear bigpage

@c annoying parentheses stripped by add-html-footer.py
@macro internalsref{NAME}
@vindex \NAME\
@ref{\NAME\,,,lilypond-internals}
@end macro

@c annoying parentheses stripped by add-html-footer.py
@macro rglos{NAME}
@vindex \NAME\
@ref{\NAME\,,,music-glossary}
@end macro

@end ifclear


@c usage: @inputfileref{input@/regression,FILE@/-NAME.ly}
@macro inputfileref{DIR,NAME}
@uref{source/\DIR\/collated-files.html#\NAME\,@file{\DIR\/\NAME\}}@c
@end macro

@c to get decent German quotes in `foo'
@macro q{TEXT}
@html
‚\TEXT\‘
@end html
@end macro

@c to get decent German quotes in ``foo''
@macro qq{TEXT}
@html
„\TEXT\“
@end html
@end macro

@end ifhtml


@ifdocbook
@c ***** DOCBOOK-XML *****

@macro internalsref{NAME}
@vindex \NAME\
@ref{\NAME\,,,lilypond-internals}
@end macro

@macro inputfileref{DIR,NAME}
@uref{source/\DIR\/collated-files.html#\NAME\,@file{\DIR\/\NAME\}}
@end macro

@macro rglos{NAME}
@vindex \NAME\
@ref{\NAME\,,,music-glossary}
@end macro

@c to get decent German quotes in `foo'
@macro q{TEXT}
@html
‚\TEXT\‘
@end html
@end macro

@c to get decent German quotes in ``foo''
@macro qq{TEXT}
@html
„\TEXT\“
@end html
@end macro

@end ifdocbook


@ifinfo
@c **** INFO ****

@macro internalsref{NAME}
@vindex \NAME\
@inforef{\NAME\,,lilypond-internals}
@end macro

@macro inputfileref{DIR,NAME}
@file{\DIR\/\NAME\}
@end macro

@macro rglos{NAME}@c
@vindex \NAME\
@inforef{\NAME\,,,music-glossary}
@end macro

@macro usermanref{NAME}
@inforef{\NAME\}
@end macro

@c to get decent quotes in `foo'
@macro q{TEXT}
‚\TEXT\‘
@end macro

@c to get decent quotes in ``foo''
@macro qq{TEXT}
„\TEXT\“
@end macro

@end ifinfo


@c **** TEX ****
@iftex

@macro internalsref{NAME}
@vindex \NAME\
@code{\NAME\}
@end macro

@macro inputfileref{DIR,NAME}
@file{\DIR\/@/\NAME\}
@end macro

@macro rglos {NAME}
@vindex \NAME\
@code{\NAME\}
@end macro

@macro seeinternals{NAME}
internals document, @internalsref{\NAME\}
@end macro

@macro usermanref{NAME}
user manual, @internalsref{\NAME\}
@end macro

@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

@c to get decent quotes in `foo'
@macro q{TEXT}
@glq\TEXT\@grq
@end macro

@c to get decent quotes in ``foo''
@macro qq{TEXT}
@glqq\TEXT\@grqq
@end macro

@end iftex


@ifnottex
@c **** not TEX ****

@macro seeinternals{NAME}
@internalsref{\NAME\}
@end macro

@ifnotinfo
@macro usermanref{NAME}
@ref{\NAME\}
@end macro
@end ifnotinfo

@end ifnottex


@c EOF