patch::: 1.3.135.jcn3

[lilypond.git] / lily / chord.cc

diff --git a/lily/chord.cc b/lily/chord.cc
index a4e428e5d4ffc75c381fb130a4cac4e15c6ff1b0..32215b656c157555d6fb6a4f05b96283c2fbe7ad 100644 (file)
--- a/lily/chord.cc
+++ b/lily/chord.cc
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1999--2000 Jan Nieuwenhuizen <janneke@gnu.org>
+  (c)  1999--2001 Jan Nieuwenhuizen <janneke@gnu.org>
 */
 
 #include "chord.hh"
@@ -152,6 +152,8 @@ Chord::member_notename (SCM p, SCM pitches)
            }
        }
     }
+  else
+    member = gh_car (member);
   return member;
 }
 
@@ -175,6 +177,8 @@ Chord::member_pitch (SCM p, SCM pitches)
            }
        }
     }
+  else
+    member = gh_car (member);
   return member;
 }