From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Tue, 24 Sep 2002 22:06:43 +0000 (+0000)
Subject: (chord::inner-name-banter): remove space.
X-Git-Tag: release/1.7.1~17
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=3e57d102c3d5c3f8b39104f602e94d5e75c0acc0;p=lilypond.git

(chord::inner-name-banter): remove space.
---

diff --git a/ChangeLog b/ChangeLog
index c428b08028..7d51dc7019 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2002-09-25  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
+
+	* scm/chord-name.scm (chord::inner-name-banter): remove space.
+
 2002-09-24  Han-Wen Nienhuys  <hanwen@cs.uu.nl>
 
 	* lily/beam.cc (connect_beams): don't crash if there are quarter
diff --git a/scm/chord-name.scm b/scm/chord-name.scm
index 7aba797718..f55e93e9f1 100644
--- a/scm/chord-name.scm
+++ b/scm/chord-name.scm
@@ -325,7 +325,7 @@
 	 (subs-text (chord::subtractions->text-banter subtractions))
 	 (b+i-text (chord::bass-and-inversion->text-banter bass-and-inversion)))
     (text-append
-     tonic-text except-text " " sep-text
+     tonic-text except-text sep-text
      ;;(list (list simple-super) adds-text subs-text)
      (list (list '((raise . 1) (font-relative-size . -1))) adds-text subs-text)
      b+i-text)))