fix duplicate labels on main doc pages

Closes PR 14101
This commit is contained in:
Matthew Flatt 2013-11-06 16:59:52 -07:00
parent 6eca0ae554
commit b455e2f775

View File

@ -51,8 +51,9 @@
;; massage the current path to an up string
(regexp-replace* #rx"[^/]*/" (regexp-replace #rx"[^/]+$" path "") "../"))
(define page-title
(title #:style (make-style #f (cons
(title #:style (make-style #f (list*
'no-toc
'toc-hidden
(if (not force-racket-css?)
null
(list