share/themes/default/layout.ily

   1 %------------------------------------------------------------------%
   2 % opus_libre -- layout.ily                                         %
   3 %                                                                  %
   4 % (c) 2008-2011 Valentin Villenave <valentin@villenave.net>        %
   5 %                                                                  %
   6 %     opus_libre is a free framework for GNU LilyPond: you may     %
   7 % redistribute it and/or modify it under the terms of the GNU      %
   8 % General Public License as published by the Free Software         %
   9 % Foundation, either version 3 of the License, or (at your option) %
  10 % any later version.                                               %
  11 %     This program is distributed WITHOUT ANY WARRANTY; without    %
  12 % even the implied warranty of MERCHANTABILITY or FITNESS FOR A    %
  13 % PARTICULAR PURPOSE.  You should have received a copy of the GNU  %
  14 % General Public License along with this program (typically in the %
  15 % share/doc/ directory).  If not, see http://www.gnu.org/licenses/ %
  16 %                                                                  %
  17 %------------------------------------------------------------------%
  18
  19 %% Only cosmetic stuff.
  20 %% For critical settings, that affect contexts or input syntax,
  21 %% (like ignoreMelismata etc.), see etc/layout/*.ily.
  22
  23
  24 \layout {
  25   \context {
  26     \Score
  27     %% subdivideBeams = ##t % set by default (see notationrules.ily)
  28     \override TrillPitchAccidental #'avoid-slur = #'inside
  29     \override TimeSignature #'style = #'()
  30     \override SystemStartBracket #'collapse-height = #1
  31     \override SystemStartBrace #'collapse-height = #1
  32
  33   %% TextScript indications are printed using the \indic markup command
  34   %% (see bin/markup-commands.scm)
  35     \override TextScript #'stencil =
  36       #(lambda (grob)
  37          (let ((grob-markup (ly:grob-property grob 'text)))
  38            (grob-interpret-markup grob (make-indic-markup grob-markup))))
  39     \override TextScript #'direction = #UP
  40   }
  41 }