commit 495630e0014781ba236a69d8834fa381527b9f57
parent f488ed28f31e0e3e335dd463b7bcbde4af1ce939
Author: Matthew Flatt <mflatt@racket-lang.org>
Date: Sat, 13 Aug 2016 07:31:58 -0600
avoid bad `substring` when something goes weird with section numbers
Diffstat:
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/scribble-lib/scribble/base-render.rkt b/scribble-lib/scribble/base-render.rkt
@@ -97,7 +97,8 @@
(format "~a." (car number)))
""))])
(if (or keep-separator?
- (pair? (car number)))
+ (pair? (car number))
+ (equal? s ""))
s
(substring s 0 (sub1 (string-length s)))))
sep)))