From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Thu, 23 Jun 2011 13:24:30 +0000 (+0200)
Subject: Fix Ancient clef display logic
X-Git-Url: https://repo.or.cz/w/orchestrallily.git/commitdiff_plain/7cedad0ae6c4ebfe44bee1c664d78595c3544615

Fix Ancient clef display logic
---

diff --git a/sceaux_clef-key.ily b/sceaux_clef-key.ily
index 696bc3d..2f03565 100644
--- a/sceaux_clef-key.ily
+++ b/sceaux_clef-key.ily
@@ -137,8 +137,8 @@
 		 (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))