From 7cedad0ae6c4ebfe44bee1c664d78595c3544615 Mon Sep 17 00:00:00 2001
From: Reinhold Kainhofer <reinhold@kainhofer.com>
Date: Thu, 23 Jun 2011 15:24:30 +0200
Subject: [PATCH] Fix Ancient clef display logic

---
 sceaux_clef-key.ily | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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))
-- 
2.11.4.GIT