From 585a04d158c6e16d696ed510d5e7e786df0a43f1 Mon Sep 17 00:00:00 2001 From: Mats Bengtsson Date: Mon, 21 Apr 2008 13:02:09 +0200 Subject: [PATCH] Do not scale the size of open and mute symbols ("X", "O") twice with the "size" property. Thanks to Frank. --- scm/fret-diagrams.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/scm/fret-diagrams.scm b/scm/fret-diagrams.scm index 2fe8f33605..a133d189af 100644 --- a/scm/fret-diagrams.scm +++ b/scm/fret-diagrams.scm @@ -256,8 +256,8 @@ Line thickness is given by @var{th}, fret & string spacing by (define (draw-xo layout props string-count fret-range size xo-list orientation) "Put open and mute string indications on diagram, as contained in @var{xo-list}." (let* ((fret-count (+ (- (cadr fret-range) (car fret-range) 1))) - (xo-font-mag (* size (chain-assoc-get 'xo-font-magnification props 0.5))) -; (xo-font-mag (* size 0.5)) + (xo-font-mag (chain-assoc-get 'xo-font-magnification props 0.5)) +; (xo-font-mag 0.5) ; (xo-horizontal-offset (* size (chain-assoc-get 'xo-horizontal-offset props -0.35))) (xo-horizontal-offset (* size -0.35)) (mypair (car xo-list)) -- 2.39.2