Add the non-default property to the KeySignature grob

diff --git a/lily/key-engraver.cc b/lily/key-engraver.cc
index 8c907dc7cccb0a4da9ed48ceaf6093a68916278c..115902e89db2b789f80e3d257b471c7a75f07143 100644 (file)
--- a/lily/key-engraver.cc
+++ b/lily/key-engraver.cc
@@ -117,6 +117,7 @@ Key_engraver::create_key (bool is_default)
     {
       SCM visibility = get_property ("explicitKeySignatureVisibility");
       item_->set_property ("break-visibility", visibility);
+      item_->set_property ("non-default", SCM_BOOL_T);
     }
 }
 

diff --git a/lily/key-signature-interface.cc b/lily/key-signature-interface.cc
index 3249a736c3f2a18c103107bdce08e851b06650b8..79e2bd99482d25b8e5eb1fb10e9fb1ce2255cae7 100644 (file)
--- a/lily/key-signature-interface.cc
+++ b/lily/key-signature-interface.cc
@@ -136,4 +136,5 @@ ADD_INTERFACE (Key_signature_interface,
                "sharp-positions "
                "padding "
                "padding-pairs "
+               "non-default "
               );

diff --git a/scm/define-grob-properties.scm b/scm/define-grob-properties.scm
index 60b9d5b000c2e6896237aac6c9404857610719ac..cb9103a6fcda899fe88d459af846f724e5e01e92 100644 (file)
--- a/scm/define-grob-properties.scm
+++ b/scm/define-grob-properties.scm
@@ -675,7 +675,7 @@ object.")
 get stems extending to the middle staff line.")
      (non-break-align-symbols ,list? "A list of symbols that determine
 which NON-break-aligned interfaces to align this to.")
-     (non-default ,boolean? "Set for manually specified clefs.")
+     (non-default ,boolean? "Set for manually specified clefs and keys.")
      (non-musical ,boolean? "True if the grob belongs to a
 @code{NonMusicalPaperColumn}.")
      (nonstaff-nonstaff-spacing ,list? "The spacing alist