Merge branch 'master' of ssh://jomand@git.sv.gnu.org/srv/git/lilypond

[lilypond.git] / ly / engraver-init.ly

diff --git a/ly/engraver-init.ly b/ly/engraver-init.ly
index 0c5b7e6db5830e226615b86dcaab1e7e0c2e3997..55da3ff6f61ddd5575bd1639f9157b8811c098e8 100644 (file)
--- a/ly/engraver-init.ly
+++ b/ly/engraver-init.ly
@@ -14,11 +14,13 @@
 \context {
   \type "Engraver_group"
   \name "FretBoards"
+  \description "A context for displaying fret diagrams."
 
-  \consists "Output_property_engraver" 
-
-  \consists "Axis_group_engraver" 
   \consists "Fretboard_engraver"
+  \consists "Rest_swallow_translator" 
+  \consists "Output_property_engraver" 
+  \consists "Skip_event_swallow_translator"
+  \consists "Hara_kiri_engraver"
   \consists "Separating_line_group_engraver"
   \consists "Font_size_engraver"
   \consists "Instrument_name_engraver"
@@ -48,6 +50,7 @@
   \consists "Ledger_line_engraver" 
   \consists "Staff_symbol_engraver"
   \consists "Collision_engraver"
+  \consists "Grob_pq_engraver"
   \consists "Rest_collision_engraver"
   \consists "Accidental_engraver"
   \consists "Piano_pedal_engraver"
@@ -372,6 +375,7 @@ printing of a single line of lyrics."
 \context {
   \type "Engraver_group"
   \name NoteNames
+  \description "A context for printing the names of notes."
   \consists "Axis_group_engraver"
 
   \override VerticalAxisGroup #'minimum-Y-extent = ##f
@@ -558,7 +562,7 @@ automatically when an output definition (a @code{\score} or
   chordPrefixSpacer = #0
   chordNameExceptionsFull = #fullJazzExceptions
   chordNameExceptionsPartial = #partialJazzExceptions
-  
+  noChordSymbol = #(make-simple-markup "N.C.")
 
   bassStaffProperties = #'((assign clefGlyph "clefs.F")
   (assign clefPosition 2)
@@ -592,6 +596,8 @@ automatically when an output definition (a @code{\score} or
     (Voice AccidentalCautionary font-size -4)
     (Voice Slur direction ,DOWN)
     (Voice Script font-size -3)
+    (Voice Fingering font-size -8)
+    (Voice StringNumber font-size -8)
   )
 
   keepAliveInterfaces = #'(
@@ -622,6 +628,7 @@ automatically when an output definition (a @code{\score} or
 \context {
   \type "Engraver_group"
   \name "FiguredBass"
+  \description "A context for printing a figured bass line."
 
   \consists "Figured_bass_engraver"
   \consists "Note_swallow_translator"
@@ -666,15 +673,13 @@ context."
   \override Beam #'length-fraction = #0.62
 
   %% No accidental in tablature !
-  \remove Accidental_engraver
+  \remove "Accidental_engraver"
 
   \override Glissando #'extra-dy = #0.75
   \override Glissando #'bound-details #'right = #`((attach-dir . ,LEFT)
                                                   (padding . 0.3))
   \override Glissando #'bound-details #'left = #`((attach-dir . ,RIGHT)
                                                   (padding . 0.3))
-  \override Glissando #'extra-dy = #0.75
-  \override Glissando #'gap = #0.2
 }
 
 \context {
@@ -793,7 +798,7 @@ of Editio Vaticana."
   \Voice
   \name "GregorianTranscriptionVoice"
   \alias "Voice"
-  
+
   %% Removing ligature bracket engraver without replacing it by some
   %% other ligature engraver would cause a "Junking event: `LigatureEvent'"
   %% warning for every "\[" and "\]".  Therefore, we make the grob
@@ -847,7 +852,8 @@ accommodated for typesetting a piece in mensural style."
   \consists "Mensural_ligature_engraver"
 
   %% Set default head for notes outside of \[ \].
-  \override NoteHead #'style = #'petrucci
+  \override NoteHead #'style = #'mensural
+  \override Rest #'style = #'mensural
 
   %% There are no beams in mensural notation.
   autoBeaming = ##f
@@ -875,8 +881,8 @@ accommodated for typesetting a piece in mensural style."
   %% FIXME: unit on StaffSymbol's width should be \linewidth.
   %% \override StaffSymbol #'width = #60.0
 
-  %% Choose petrucci g clef on 2nd line as default.
-  clefGlyph = #"clefs.petrucci.g"
+  %% Choose mensural g clef on 2nd line as default.
+  clefGlyph = #"clefs.mensural.g"
   middleCClefPosition = #-6
   middleCPosition = #-6
   clefPosition = #-2
@@ -894,7 +900,7 @@ accommodated for typesetting a piece in mensural style."
   %% #(set-accidental-style 'forget))
   extraNatural = ##f
   autoAccidentals = #`(Staff ,(make-accidental-rule 'same-octave -1))
-  autoCautionaries = #'()  
+  autoCautionaries = #'()
   printKeyCancellation = ##f
 }