lilypond-1.3.136

diff --git a/input/test/ancient-font.ly b/input/test/ancient-font.ly
index fa45aac5060685152f5950f30ffac6b5928a536b..608810ada40a02fddc4de821650ae49ab9d03e62 100644 (file)
--- a/input/test/ancient-font.ly
+++ b/input/test/ancient-font.ly
@@ -61,6 +61,7 @@ lowerVoice =  \context Staff = lowerNotes <
        \property Staff.Custos \override #'style = #'mensural
        \clef "mensural1_c2";
        c2 d e f g
+        \property Staff.forceClef = ##t
        \clef "mensural1_c2";
        a b c'
        b a g f
@@ -69,6 +70,7 @@ lowerVoice =  \context Staff = lowerNotes <
 
        \clef "mensural2_c2";
        c2 d e f g
+        \property Staff.forceClef = ##t
        \clef "mensural3_c2";
        a b c'
        b a g f
@@ -77,25 +79,30 @@ lowerVoice =  \context Staff = lowerNotes <
 
        \clef "mensural1_f";
        c2 d e f g
+        \property Staff.forceClef = ##t
        \clef "mensural1_f";
        a b c'
        b a g f
        \clef "mensural2_f";
        e d c1 \bar "|";
 
+        \property Staff.forceClef = ##t
        \clef "mensural2_f";
        c2 d e f g
        \clef "mensural_g";
        a' b' c''
        b' a' g' f'
+        \property Staff.forceClef = ##t
        \clef "mensural_g";
        e' d' c'1 \bar "|";
 
+        \property Staff.forceClef = ##t
        \clef "mensural_g";
        c'2 d' e' f' g'
        \clef "hufnagel_do_fa";
        a b c'
        b a g f
+        \property Staff.forceClef = ##t
        \clef "hufnagel_do_fa";
        e d c1 \bar "||";
     }

diff --git a/scm/translator-property-description.scm b/scm/translator-property-description.scm
index 08d4760326bf195afd37a435776ee4de49a16d7c..dedc4f95b87dd53854e7961954773ef5dd0de324 100644 (file)
--- a/scm/translator-property-description.scm
+++ b/scm/translator-property-description.scm
@@ -163,7 +163,7 @@ procedure? "visibility-lambda function for explicit Key changes;
 
 (translator-property-description 'followThread boolean?
                                 "if set, note heads are tracked  across staff switches by a thin line")
-(translator-property-description 'forceClef boolean? "Show clef symbol, even if it hasn't changed.")
+(translator-property-description 'forceClef boolean? "Show clef symbol, even if it hasn't changed. Only active for the first clef after the property is set, not for the full staff.")
 (translator-property-description 'forgetAccidentals boolean? "do
 not set localKeySignature when a note alterated differently from
 localKeySignature is found.