From b9e84929e884abea45e48417d9f181fb54c8dadf Mon Sep 17 00:00:00 2001
From: Matthias Neeracher <neeri@users.sourceforge.net>
Date: Mon, 4 Jun 2007 06:29:25 +0000
Subject: [PATCH] Tweak chord font

---
 Resources/Templates/default.lyt | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/Resources/Templates/default.lyt b/Resources/Templates/default.lyt
index f8b90e5..96af19a 100644
--- a/Resources/Templates/default.lyt
+++ b/Resources/Templates/default.lyt
@@ -23,7 +23,7 @@
 %
 vlMaj = \markup {\smaller \whiteTriangleMarkup}
 vlSus = \markup {\fontsize #-4.0 "sus"}
-vlSusKern = \markup {\hspace #-1.0 \vlSus}
+vlSusKern = \markup {\hspace #-0.5 \vlSus}
 vlSharp = #(alteration->text-accidental-markup SHARP)
 vlFlat = #(markup #:hspace 0.2 (alteration->text-accidental-markup FLAT))
 
@@ -72,7 +72,9 @@ vlExceptions = #(append
 
 \score {
   <<
-    \context ChordNames \chords { \override ChordName #'font-size = #6
+    \context ChordNames \chords { 
+        \override ChordName #'font-family = #'BitstreamVeraSansMono
+        \override ChordName #'font-size = #6
     	\set chordNameExceptions = #vlExceptions
 	\set chordNameSeparator = ""
 	\set chordRootNamer = #note-name->markup