From: David Kastrup Date: Sat, 27 Apr 2013 12:58:17 +0000 (+0200) Subject: Use (+inf . -inf) consistently for empty stencil intervals X-Git-Tag: release/2.17.19-1~5^2~16 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a84bcfd8f40c4f7c1666534336f3f794ac763387;p=lilypond.git Use (+inf . -inf) consistently for empty stencil intervals --- 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)))