CVSROOT: /cvsroot/lilypond
Module name: lilypond
Branch:
Changes by: Pedro Kroger <[EMAIL PROTECTED]> 05/05/26 01:25:37
Modified files:
. : ChangeLog
scm : titling.scm
Log message:
added printpagenumber
CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ChangeLog.diff?tr1=1.3659&tr2=1.3660&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/scm/titling.scm.diff?tr1=1.15&tr2=1.16&r1=text&r2=text
Patches:
Index: lilypond/ChangeLog
diff -u lilypond/ChangeLog:1.3659 lilypond/ChangeLog:1.3660
--- lilypond/ChangeLog:1.3659 Thu May 26 00:09:53 2005
+++ lilypond/ChangeLog Thu May 26 01:25:37 2005
@@ -1,3 +1,8 @@
+2005-05-25 Pedro Kroger <[EMAIL PROTECTED]>
+
+ * scm/titling.scm (marked-up-headfoot): doesn't print pagenumbers
+ if printpagenumber is false.
+
2005-05-26 Han-Wen Nienhuys <[EMAIL PROTECTED]>
* lily/font-config.cc (init_fontconfig): comment out FontConfig
Index: lilypond/scm/titling.scm
diff -u lilypond/scm/titling.scm:1.15 lilypond/scm/titling.scm:1.16
--- lilypond/scm/titling.scm:1.15 Tue Mar 8 13:51:19 2005
+++ lilypond/scm/titling.scm Thu May 26 01:25:37 2005
@@ -48,7 +48,9 @@
(else "")))
(cons 'page:last? last?)
(cons 'page:page-number-string
- (number->string page-number))
+ (if (ly:output-def-lookup layout 'printpagenumber)
+ (number->string page-number)
+ ""))
(cons 'page:page-number page-number)))
(props (append
(list pgnum-alist)
_______________________________________________
Lilypond-cvs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-cvs
