From: fred <fred>
Date: Tue, 26 Mar 2002 21:26:22 +0000 (+0000)
Subject: lilypond-1.0.11
X-Git-Tag: release/1.5.59~2873
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=e1bb95a9d90b8c2a75ff126bbaea62cdc6037328;p=lilypond.git

lilypond-1.0.11
---

diff --git a/lily/key-engraver.cc b/lily/key-engraver.cc
index 23df0763f3..be1cedace1 100644
--- a/lily/key-engraver.cc
+++ b/lily/key-engraver.cc
@@ -51,9 +51,12 @@ void
 Key_engraver::acknowledge_element (Score_element_info info)
 {
   Command_req * r_l = info.req_l_->access_Command_req () ;
+
   if (r_l && r_l->access_Clef_change_req ()) 
     {
-      create_key ();
+      int i= get_property ("createKeyOnClefChange").length_i ();
+      if (i)
+	create_key ();
     }
   else if (info.elem_l_->is_type_b (Bar::static_name ())
 	   && accidental_idx_arr_.size ())