*** empty log message ***

diff --git a/ChangeLog b/ChangeLog
index c560e888bdd345742fdd7e8fdf9af185d124e5ec..645787ff963f52bdf8effe1bac2e31fc31ed0705 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2004-08-08  Carl Sorensen  <carldsorensen@comcast.net>
 
+       * scm/fret-diagrams.scm : change sans-serif font encoding from 
+       TeX-text to ec (uses ecss fonts instead of cmss fonts)
+
        * scm/define-grob-interfaces.scm (fret-diagram-interface): add
        number-type and label-dir
 

diff --git a/scm/fret-diagrams.scm b/scm/fret-diagrams.scm
index b577c98d2b235f33ed35d17e7a765944c5fdca72..39b31d8cacdd12babb232be5cc25e694c579e800 100644 (file)
--- a/scm/fret-diagrams.scm
+++ b/scm/fret-diagrams.scm
@@ -154,13 +154,13 @@
          (finger (if (number? finger) (number->string finger) finger))
           (string-label-font 
                (ly:paper-get-font paper `(((font-family . sans)
-                                           (font-encoding . ,my-font-encoding)
+                                           (font-encoding . ,ss-font-encoding)
                                            (font-series . medium) 
                                            (font-shape . upright)
                                            (font-size . ,(stepmag  string-label-font-mag))))))
           (dot-label-font 
                (ly:paper-get-font paper `(((font-family . sans)
-                                           (font-encoding . ,my-font-encoding)
+                                           (font-encoding . ,ss-font-encoding)
                                            (font-series . medium) 
                                            (font-shape . upright)
                                            (font-size . ,(stepmag  dot-label-font-mag))))))
@@ -213,7 +213,7 @@
            (xo-font-mag (* size 0.5))
 ;           (xo-horizontal-offset (* size (chain-assoc-get 'xo-horizontal-offset props -0.35)))
            (xo-horizontal-offset (* size -0.35))
-           (font (ly:paper-get-font paper `(((font-encoding . ,my-font-encoding)(font-family . sans)
+           (font (ly:paper-get-font paper `(((font-encoding . ,ss-font-encoding)(font-family . sans)
                                         (font-series . medium) (font-shape . upright)
                                         (font-size . ,(stepmag (* size xo-font-mag)))))))
            (mypair (car xo-list))
@@ -286,7 +286,7 @@
           (label-vertical-offset -0.2)
          (number-type (chain-assoc-get 'number-type props 'roman-lower))
           (fret-count (+ (- (cadr fret-range) (car fret-range)) 1))
-          (font (ly:paper-get-font paper `(((font-encoding . ,my-font-encoding)
+          (font (ly:paper-get-font paper `(((font-encoding . ,ss-font-encoding)
                                             (font-family . sans)
                                             (font-series . medium) 
                                             (font-shape . upright)