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

diff --git a/ChangeLog b/ChangeLog
index c428b08028a62fed6931941c5748437baec68f69..7d51dc7019c4843cc37b87bf9e619aa7a6616bc1 100644 (file)
--- 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 7aba79771854a8aff0e3e1d708185c9b88aa1a23..f55e93e9f1938b111f69b6166770e9809fc6958b 100644 (file)
--- 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)))