Fix Ancient clef display logic
authorReinhold Kainhofer <reinhold@kainhofer.com>
Thu, 23 Jun 2011 13:24:30 +0000 (23 15:24 +0200)
committerReinhold Kainhofer <reinhold@kainhofer.com>
Thu, 23 Jun 2011 13:24:30 +0000 (23 15:24 +0200)
sceaux_clef-key.ily

index 696bc3d..2f03565 100644 (file)
                 (ly:grob-property grob 'long-text)
                 (ly:grob-property grob 'text)))
         (incipit-score (if (and start-of-score
-                (or (eqv? #t (ly:get-option 'incipit))
-                     (not (eqv? #t (ly:get-option 'ancient-style)))))
+                (eqv? #t (ly:get-option 'incipit))
+                     (not (eqv? #t (ly:get-option 'ancient-style))))
                 (create-incipit-score grob name)
                 #f)))
     (if (not (eqv? #f incipit-score))