From de6c6eab76592102d70b9406937b108e75b8bcf8 Mon Sep 17 00:00:00 2001 From: Juergen Reuter Date: Thu, 2 Aug 2007 17:46:54 +0200 Subject: [PATCH] * Bugfix: correct order in accidentals glyph-name-alist --- scm/output-lib.scm | 16 ++++++++-------- 1 files changed, 8 insertions(+), 8 deletions(-) diff --git a/scm/output-lib.scm b/scm/output-lib.scm index bd3aa52..af454f2 100644 --- a/scm/output-lib.scm +++ b/scm/output-lib.scm @@ -398,24 +398,24 @@ centered, X==1 is at the right, X == -1 is at the left." )) (define-public alteration-hufnagel-glyph-name-alist - '((1/2 . "accidentals.hufnagel-1") + '((-1/2 . "accidentals.hufnagel-1") (0 . "accidentals.vaticana0") - (-1/2 . "accidentals.mensural1"))) + (1/2 . "accidentals.mensural1"))) (define-public alteration-medicaea-glyph-name-alist - '((1/2 . "accidentals.medicaea-1") + '((-1/2 . "accidentals.medicaea-1") (0 . "accidentals.vaticana0") - (-1/2 . "accidentals.mensural1"))) + (1/2 . "accidentals.mensural1"))) (define-public alteration-vaticana-glyph-name-alist - '((1/2 . "accidentals.vaticana-1") + '((-1/2 . "accidentals.vaticana-1") (0 . "accidentals.vaticana0") - (-1/2 . "accidentals.mensural1"))) + (1/2 . "accidentals.mensural1"))) (define-public alteration-mensural-glyph-name-alist - '((1/2 . "accidentals.mensural-1") + '((-1/2 . "accidentals.mensural-1") (0 . "accidentals.vaticana0") - (-1/2 . "accidentals.mensural1"))) + (1/2 . "accidentals.mensural1"))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -- 1.5.2.2