From: fred <fred>
Date: Tue, 26 Mar 2002 23:25:20 +0000 (+0000)
Subject: lilypond-1.3.75
X-Git-Tag: release/1.5.59~1447
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=d1d0928dc93121cd26a178aae4fd4c83888389cb;p=lilypond.git

lilypond-1.3.75
---

diff --git a/lily/chord-name.cc b/lily/chord-name.cc
index c05ebfc187..62562e08ec 100644
--- a/lily/chord-name.cc
+++ b/lily/chord-name.cc
@@ -136,11 +136,11 @@ Chord_name::brew_molecule (SCM smob)
     style = ly_str02scm ("banter");
 
   SCM inversion = sc-> get_elt_property ("inversion");
-  if (inversion != SCM_BOOL_T)
+  if (inversion == SCM_EOL)
     inversion = SCM_BOOL_F;
 
   SCM bass =  sc->get_elt_property ("bass");
-  if (bass != SCM_BOOL_T)
+  if (bass == SCM_EOL)
     bass = SCM_BOOL_F;
 
   SCM pitches =  sc->get_elt_property ("pitches");