From a84bcfd8f40c4f7c1666534336f3f794ac763387 Mon Sep 17 00:00:00 2001 From: David Kastrup Date: Sat, 27 Apr 2013 14:58:17 +0200 Subject: [PATCH] Use (+inf . -inf) consistently for empty stencil intervals --- scm/define-markup-commands.scm | 3 ++- scm/titling.scm | 2 +- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/scm/define-markup-commands.scm b/scm/define-markup-commands.scm index 96236f1769..1b81a508dd 100755 --- a/scm/define-markup-commands.scm +++ b/scm/define-markup-commands.scm @@ -111,7 +111,8 @@ ;; utility functions ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(define-public empty-stencil (ly:make-stencil '() '(1 . -1) '(1 . -1))) +(define-public empty-stencil (ly:make-stencil '() + empty-interval empty-interval)) (define-public point-stencil (ly:make-stencil "" '(0 . 0) '(0 . 0))) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; diff --git a/scm/titling.scm b/scm/titling.scm index b6c1e0583d..7118fb1a06 100644 --- a/scm/titling.scm +++ b/scm/titling.scm @@ -100,4 +100,4 @@ with `header:'." (if (markup? markup) (interpret-markup layout props markup) - (ly:make-stencil '() '(1 . -1) '(1 . -1))))) + empty-stencil))) -- 2.39.5