From efe4591faf2f5c9353c742d9fe696476f042f2ef Mon Sep 17 00:00:00 2001 From: Keith OHara Date: Fri, 29 Nov 2013 17:12:19 -0800 Subject: [PATCH] Reduce offsets of \super and \sub This brings chordNames and text superscripts into better agreement with the shifts in user-provided scans. --- scm/define-markup-commands.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/scm/define-markup-commands.scm b/scm/define-markup-commands.scm index ee2671a963..fe1cff509a 100644 --- a/scm/define-markup-commands.scm +++ b/scm/define-markup-commands.scm @@ -3970,7 +3970,7 @@ Set @var{arg} in superscript with a normal font size. @end lilypond" (ly:stencil-translate-axis (interpret-markup layout props arg) - (* 0.5 baseline-skip) Y)) + (* 0.33 baseline-skip) Y)) (define-markup-command (super layout props arg) (markup?) @@ -3997,7 +3997,7 @@ Set @var{arg} in superscript. layout (cons `((font-size . ,(- font-size 3))) props) arg) - (* 0.5 baseline-skip) + (* 0.33 baseline-skip) Y)) (define-markup-command (translate layout props offset arg) @@ -4045,7 +4045,7 @@ Set @var{arg} in subscript. layout (cons `((font-size . ,(- font-size 3))) props) arg) - (* -0.5 baseline-skip) + (* -0.25 baseline-skip) Y)) (define-markup-command (normal-size-sub layout props arg) @@ -4067,7 +4067,7 @@ Set @var{arg} in subscript with a normal font size. @end lilypond" (ly:stencil-translate-axis (interpret-markup layout props arg) - (* -0.5 baseline-skip) + (* -0.25 baseline-skip) Y)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -- 2.39.5