From: fred <fred>
Date: Wed, 27 Mar 2002 00:30:55 +0000 (+0000)
Subject: lilypond-1.3.103
X-Git-Tag: release/1.5.59~1136
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=4ab7c64eded6f1df7360f857f5cea5d56680e8a2;p=lilypond.git

lilypond-1.3.103
---

diff --git a/lily/chord-name-engraver.cc b/lily/chord-name-engraver.cc
index 8729cb57a2..aa5c6f27ee 100644
--- a/lily/chord-name-engraver.cc
+++ b/lily/chord-name-engraver.cc
@@ -116,7 +116,7 @@ void
 Chord_name_engraver::create_chord_name ()
 {
   assert (chord_p_);
-  chord_name_p_ = new Item (get_property ("ChordNames"));
+  chord_name_p_ = new Item (get_property ("ChordName"));
   /*
     Hmm, why not represent complete chord as list?
     ((tonic third fifth) (inversion bass))
diff --git a/scm/element-descriptions.scm b/scm/element-descriptions.scm
index 9bd688f806..ac46e1c525 100644
--- a/scm/element-descriptions.scm
+++ b/scm/element-descriptions.scm
@@ -84,7 +84,7 @@
 	   (meta . ,(element-description "Clef" clef-interface font-interface break-aligned-interface ))
 	))
 
-	(ChordNames . (
+	(ChordName . (
 		(molecule-callback . ,Chord_name::brew_molecule)
 		(after-line-breaking-callback . ,Chord_name::after_line_breaking)
 		(chord-name-function . ,default-chord-name-function)
@@ -242,7 +242,8 @@
 	))
 	
 	(RehearsalMark . (
-		(molecule-callback . ,Text_item::brew_molecule)	
+		(molecule-callback . ,Text_item::brew_molecule)
+		(direction . 1)
 		(breakable . #t)
 		(font-family . number)
 		(font-relative-size . 1)
@@ -454,12 +455,12 @@
 		(collapse-height . 1.0)
 		(thickness . 1.6)
 		(arch-height . 1.5)
-		(arch-angle . 25.0)
+		(arch-angle . 50.0)
 		(arch-thick . 0.25)
 		(glyph . bar-line)
 		(arch-width . 1.5)
 		(bracket-thick . 0.25)
-		(bracket-width . 0.4)
+		(bracket-width . 2.0)
 		(font-family . braces)
 		(font-point-size . 20)
 		(Y-extent-callback . #f)