(LY_DEFINE): use Scheme style naming for

[lilypond.git] / lily / key-performer.cc

diff --git a/lily/key-performer.cc b/lily/key-performer.cc
index d596c7399e71ee2f379ef34e9fd0be1a03a93974..dbdfb4d8351a78f9febcfd0e0cc10f8029157c94 100644 (file)
--- a/lily/key-performer.cc
+++ b/lily/key-performer.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--2003 Jan Nieuwenhuizen <janneke@gnu.org>
+  (c) 1997--2004 Jan Nieuwenhuizen <janneke@gnu.org>
 */
 
 #include "lily-guile.hh"
@@ -44,7 +44,7 @@ Key_performer::create_audio_elements ()
 {
   if (key_req_) 
     {
-      SCM pitchlist = key_req_->get_mus_property ("pitch-alist");
+      SCM pitchlist = key_req_->get_property ("pitch-alist");
       SCM proc = scm_primitive_eval (ly_symbol2scm ("accidentals-in-key")); 
       SCM acc = gh_call1 (proc, pitchlist);