Merge branch 'master' of git://git.sv.gnu.org/lilypond

[lilypond.git] / lily / key-signature-interface.cc

diff --git a/lily/key-signature-interface.cc b/lily/key-signature-interface.cc
index 37f985697ea85844ec17ed41ea3ad01cb919f9f7..d6513efd84b1b6ad96ea0bb83d3c305c46f23e23 100644 (file)
--- a/lily/key-signature-interface.cc
+++ b/lily/key-signature-interface.cc
@@ -109,8 +109,8 @@ Key_signature_interface::print (SCM smob)
   if (scm_is_number (c0s))
     c0p = scm_to_int (c0s);
 
-  /* Is this the correct way to determine this? -rz */
-  bool is_cancellation = me->name()=="KeyCancellation";
+  bool is_cancellation = me->internal_has_interface
+    (ly_symbol2scm ("key-cancellation-interface"));
 
   /*
     SCM lists are stacks, so we work from right to left, ending with
@@ -160,4 +160,8 @@ Key_signature_interface::print (SCM smob)
 
 ADD_INTERFACE (Key_signature_interface,
               "A group of accidentals, to be printed as signature sign.",
-              "style c0-position alteration-alist");
+
+              "c0-position "
+              "style "
+              "alteration-alist "
+              );