*** empty log message ***

[lilypond.git] / lily / note-head.cc

diff --git a/lily/note-head.cc b/lily/note-head.cc
index b5781a7a018d5be680bfd7874df1910301bbe391..9f2dff2c80782b72bcbd1fb0927e961b7751c8ec 100644 (file)
--- a/lily/note-head.cc
+++ b/lily/note-head.cc
@@ -103,9 +103,9 @@ Note_head::brew_ez_stencil (SCM smob)
   SCM idx = scm_int2num (pit->get_notename ());
   SCM names = me->get_property ("note-names");
   SCM charstr = SCM_EOL;
-  if (ly_c_vector_p (names))
+  if (scm_is_vector (names))
     charstr = scm_vector_ref (names, idx);
-  else
+  else 
     {
       char s[2] = "a";
       s[0] = (pit->get_notename () + 2)%7 + 'a';