Fixed using make-link-element

This commit is contained in:
Georges Dupéron 2016-09-30 14:01:21 +02:00
parent 396dc28534
commit 17a9ad4174

View File

@ -2,10 +2,15 @@
@title[#:tag-prefix '(lib "test-tag-prefix/scribblings/sub.scrbl")]{sub}
@(require scribble/struct)
@(require scribble/struct
scribble/decode)
@(make-toc-element #f
(list (elemtag '(prefixable "foo") "foo-tag"))
(list (elemref '(prefixable "foo") "foo-ref-in-toc")))
(list (make-link-element #f
(decode-content (list "foo-ref-in-toc"))
`(elem (prefixable "(lib test-tag-prefix/scribblings/test-tag-prefix.scrbl)"
"(lib test-tag-prefix/scribblings/sub.scrbl)"
"foo")))))
@(elemref '(prefixable "foo") "foo-ref-in-part")