From aed2c1247ec3246a4ad32a15895dd3a3171a0758 Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Thu, 26 Jan 2006 00:25:23 +0000 Subject: [PATCH] (annotate-space-left): thinko. (annotate-page): more thinkos. --- ChangeLog | 1 + scm/page.scm | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 9856ec6c3a..1f82b9c2d4 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,6 +1,7 @@ 2006-01-26 Han-Wen Nienhuys * scm/page.scm (annotate-space-left): thinko. + (annotate-page): more thinkos. 2006-01-25 Han-Wen Nienhuys diff --git a/scm/page.scm b/scm/page.scm index 49b64df83e..766db7911e 100644 --- a/scm/page.scm +++ b/scm/page.scm @@ -70,7 +70,7 @@ (map (lambda (ps) (ly:prob-property ps 'number)) (page-lines node))) -(define (annotate-page stencil layout) +(define (annotate-page layout stencil) (let* ((topmargin (ly:output-def-lookup layout 'topmargin)) (vsize (ly:output-def-lookup layout 'vsize)) -- 2.39.2