From: hanwen <hanwen>
Date: Mon, 21 Apr 2003 01:16:19 +0000 (+0000)
Subject: ($(outdir)/lilypond-internals/lilypond-internals.html): copy ly
X-Git-Tag: release/1.7.25~314
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a75e466e4be9a83cf4067fe0ba25890fa3f3f05a;p=lilypond.git

($(outdir)/lilypond-internals/lilypond-internals.html): copy ly
files too.
---

diff --git a/input/regression/breathing-sign.ly b/input/regression/breathing-sign.ly
index e0c80a6717..f5b8f1d280 100644
--- a/input/regression/breathing-sign.ly
+++ b/input/regression/breathing-sign.ly
@@ -72,17 +72,17 @@ finalis, the latter three looking similar to bar glyphs.
       \context Voice = one { \stemUp g4 as g }
     > |
 
-% \divisiominima is a simple vertical stroke through the uppermost
+% \divisioMinima is a simple vertical stroke through the uppermost
 % staffline, just like the original implementation of breathing signs.
-    < \context Voice = two { \stemDown es4 \divisiominima bes es }
+    < \context Voice = two { \stemDown es4 \divisioMinima bes es }
       \context Voice = one { \stemUp g4 as g }
     > |
 % \divisio{maior,maxima} and \finalis look like bars and are vertically
 % centered on the staff; the direction property has no effect
-    < \context Voice = two { \stemDown es4 \divisiomaior bes es }
+    < \context Voice = two { \stemDown es4 \divisioMaior bes es }
       \context Voice = one { \stemUp g4 as g }
     > |
-    < \context Voice = two { \stemDown es4 \divisiomaxima bes es }
+    < \context Voice = two { \stemDown es4 \divisioMaxima bes es }
       \context Voice = one { \stemUp g4 as g }
     > |
 
diff --git a/scm/chords-ignatzek.scm b/scm/chords-ignatzek.scm
index b2d00981c3..f1c61ff517 100644
--- a/scm/chords-ignatzek.scm
+++ b/scm/chords-ignatzek.scm
@@ -202,7 +202,10 @@
     (let ((nn (ly:get-context-property context 'chordNoteNamer)))
       (if (eq? nn '())
 	  ; replacing the next line with name-root gives guile-error...? -rz
-	  name-root
+
+	  ;; apparently sequence of defines is equivalent to let, not let* ? -hwn
+	  (ly:get-context-property context 'chordRootNamer)	  
+	  ;; name-root
 	  nn)))
 
   (define (is-natural-alteration? p)