Hi, here is a patch to choose the format of page numbers, setting a \paper variable "page-number-format" to "arabic" (default), "roman", "Roman" (see LaTeX) or to a "int->string" closure.
If it if accepted, I will definitely backport it to 2.8: which is the preferred procedure in these situations? Is it ok to send 2 patches? Cheers, Guido Amoruso
Index: scm/titling.scm =================================================================== RCS file: /cvsroot/lilypond/lilypond/scm/titling.scm,v retrieving revision 1.21 diff -u -3 -p -r1.21 titling.scm --- scm/titling.scm 6 Feb 2006 01:13:59 -0000 1.21 +++ scm/titling.scm 27 Jun 2006 14:16:21 -0000 @@ -43,7 +43,17 @@ page:last?, page:page-number-string and (ly:output-def-lookup layout 'tagline))) (cons 'page:last? last?) (cons 'page:page-number-string - (number->string page-number)) + (cond + ((equal? (ly:output-def-lookup layout 'page-number-format) "arabic") + (number->string page-number)) + ((equal? (ly:output-def-lookup layout 'page-number-format) "roman") + (string-downcase (format #f "[EMAIL PROTECTED]" page-number))) + ((equal? (ly:output-def-lookup layout 'page-number-format) "Roman") + (format #f "[EMAIL PROTECTED]" page-number)) + ((closure? (ly:output-def-lookup layout 'page-number-format)) + ((ly:output-def-lookup layout 'page-number-format) page-number)) + (else + (number->string page-number)))) (cons 'page:page-number page-number))) (props (append (list pgnum-alist)
_______________________________________________ lilypond-devel mailing list [email protected] http://lists.gnu.org/mailman/listinfo/lilypond-devel
