X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Fmensural-ligatures.ly;h=bf15f85e7b6d6b66116d98200487de5f68ef6819;hb=82e8427010b8e1a932e0642f03b0c94a8494f03a;hp=a96fe98a8b52c12943f58c15e8aded1a97efce72;hpb=730c54a571ab3b6c30e02be5f93c876abee0f9a7;p=lilypond.git

diff --git a/input/regression/mensural-ligatures.ly b/input/regression/mensural-ligatures.ly
index a96fe98a8b..bf15f85e7b 100644
--- a/input/regression/mensural-ligatures.ly
+++ b/input/regression/mensural-ligatures.ly
@@ -1,4 +1,4 @@
-\version "2.10.0"
+\version "2.17.6"
 
 \header {
   texidoc = "Mensural ligatures show different shapes, depending on the
@@ -8,22 +8,27 @@
 
 \layout {
   ragged-right = ##t
-  packed = ##t
   indent = 0.0
   \context {
     \Voice
-    \remove Ligature_bracket_engraver
-    \consists Mensural_ligature_engraver
+    \remove "Ligature_bracket_engraver"
+    \consists "Mensural_ligature_engraver"
+  }
+  \context {
+    \Score
+    \override SpacingSpanner.packed-spacing = ##t
+    \override PaperColumn.keep-inside-line = ##f
   }
 }
 
-\context Voice{
+\context Voice {
   \clef "petrucci-c4"
   \set Staff.printKeyCancellation = ##f
   \cadenzaOn % turn off bar lines
-  #(set-accidental-style 'forget)
+  \accidentalStyle forget
+  \textLengthOn
 
-				% ligaturae binaria
+% ligaturae binaria
 
   \[
     b\breve^\markup { \column { { \bold "ligaturae binaria" } "BL" } }
@@ -77,7 +82,7 @@
 
   \bar "|" \break
 
-				% ligaturae ternariae, quaternariae, etc. (sicut in Apel[1])
+% ligaturae ternariae, quaternariae, etc. (sicut in Apel[1])
 
   \[
     b\breve^\markup {
@@ -132,7 +137,7 @@
 
   \bar "|" \break
 
-				% examples from "dtv-Atlas zur Musik" [2]
+% examples from "dtv-Atlas zur Musik" [2]
 
   \[
     d'\breve^\markup { \column { { \bold "dtv-Atlas" } "BBL" } }
@@ -180,7 +185,7 @@
 
   \bar "|" \break
 
-				% some ligatures from Ockeghem: Missa De plus en plus
+% some ligatures from Ockeghem: Missa De plus en plus
 
   \[
     c'\maxima^\markup {
@@ -208,12 +213,15 @@
     \]
 
   \[
-    b\longa^\markup { "LBBBBB" }
+    \override NoteHead.style = #'blackpetrucci
+    b\longa^\markup { "LBBBBB." }
     c'\breve
     d'
     g
+    \once \override NoteHead.ligature-flexa = ##t
     f
-    g
+    \revert NoteHead.style
+    g\breve.
     \]
 
   \[
@@ -225,9 +233,11 @@
     \]
 
   \[
+    \override NoteHead.style = #'blackpetrucci
     e'1^\markup { "SSB" }
     a
     g\breve
+    \revert NoteHead.style
     \]
 
   \[
@@ -237,9 +247,35 @@
     e'
     \]
 
+  \[
+    \override NoteHead.style = #'blackpetrucci
+    e'\longa^\markup { "LBB" }
+    f'\breve
+    \revert NoteHead.style
+    e'
+    \]
+
+  \[
+    \override NoteHead.style = #'blackpetrucci
+    b\breve^\markup { "BBBBBBL" }
+    g
+    \override NoteHead.ligature-flexa = ##t
+    \override NoteHead.flexa-width = #3
+    f
+    f'
+    \override NoteHead.flexa-width = #5
+    b
+    c'
+    \revert NoteHead.style
+    % though ligature-flexa is still ##t, this pair must be drawn as recta
+    b\longa
+    \revert NoteHead.flexa-width
+    \revert NoteHead.ligature-flexa
+    \]
+
   \bar "|" \break
 
-				% some from the Requiem
+% some from the Requiem
 
   \[
     a1^\markup { \column { { \bold "Ockeghem: Requiem" } "SSBBBBBBBL" } }
@@ -263,8 +299,18 @@
     \]
 
   \bar "|" \break
+}
 
-				% crazy ligatures
+\context Staff \with
+{
+  \override StaffSymbol.line-count = #4
+}
+{
+  \clef "petrucci-c5"
+  \set Staff.printKeyCancellation = ##f
+  \cadenzaOn % turn off bar lines
+  \accidentalStyle forget
+  \textLengthOn
 
   \[
     c\breve^\markup { \column { { \bold "crazy ligatures" } "BBBBB" } }
@@ -294,16 +340,16 @@
   \[
     b^\markup { "B.B." }
     a
-    \] % TODO: dots within ligatures must be placed above heads
+    \] % TODO the first dot is too high to avoid a non-existent (ledger) line
 
   \bar "|" \break
 
-				% invalid ligatures (those commented out are rejected with explanation)
+% invalid ligatures (those commented out are rejected with explanation)
 
-				%  \[
-				%    a1^\markup { \column { { \bold "invalid ligatures" } "SS" } }
-				%    as
-				%  \]
+%  \[
+%    a1^\markup { \column { { \bold "invalid ligatures" } "SS" } }
+%    as
+%  \]
 
   \[
     a\breve^\markup { "BBB" }
@@ -311,23 +357,23 @@
     as
     \]
 
-				%  \[
-				%    f\longa^\markup { "LLB" }
-				%    g
-				%    f\breve
-				%  \]
+%  \[
+%    f\longa^\markup { "LLB" }
+%    g
+%    f\breve
+%  \]
 
-				%  \[
-				%    f\breve^\markup { "BSLB" }
-				%    a1
-				%    g\longa
-				%    a\breve
-				%  \]
+%  \[
+%    f\breve^\markup { "BSLB" }
+%    a1
+%    g\longa
+%    a\breve
+%  \]
 }
 
 
 % Litterae:
 %
 % [1] Willi Apel: The Notation of Polyphonic Music. 900-1600.
-% [2] Ulrich Michels: dtv-Altlas zur Musik, 1977.
+% [2] Ulrich Michels: dtv-Atlas zur Musik, 1977.
 %