diff --git a/pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt b/pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt index 2f44179a..41c8152c 100644 --- a/pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt +++ b/pkgs/scribble-pkgs/scribble-lib/scribble/latex-render.rkt @@ -399,7 +399,8 @@ (- (+ (list-ref (list-ref bstr+info+suffix 0) 3) (- (ceiling height) height)) pad-bottom))] - [width (- (list-ref (list-ref bstr+info+suffix 0) 1) pad-left pad-right)] + [width (let ([w (list-ref (list-ref bstr+info+suffix 0) 1)]) + (and w (- w pad-left pad-right)))] [fn (install-file (format "pict~a" suffix) bstr)]) (if descent (printf "\\raisebox{-~abp}{\\makebox[~abp][l]{\\includegraphics[~atrim=~a ~a ~a ~a]{~a}}}"