From: Joe Neeman Date: Sat, 21 Jul 2007 11:43:41 +0000 (+1000) Subject: don't crash on an empty eps file X-Git-Tag: release/2.11.29-1~42 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=cb7c6016d94a0c02056db6bd8c93d495aecbcc60;p=lilypond.git don't crash on an empty eps file --- diff --git a/scm/stencil.scm b/scm/stencil.scm index db35a5ecc5..127a5f62ad 100644 --- a/scm/stencil.scm +++ b/scm/stencil.scm @@ -279,7 +279,9 @@ encloses the contents. (- (list-ref bbox 2) (list-ref bbox 0)) (- (list-ref bbox 3) (list-ref bbox 1)) )) - (factor (exact->inexact (/ size bbox-size))) + (factor (if (< 0 bbox-size) + (exact->inexact (/ size bbox-size)) + 0)) (scaled-bbox (map (lambda (x) (* factor x)) bbox)) (clip-rect-string (ly:format