76cca479d9
Using #lang scribble/base produces HTML output in the old style, while #lang scribble/manual uses the new style. To get the new style without switching to `#lang scribble/manual`, use `manual-doc-style`. Related changes include the addition of `css-style-addition` and `js-style-addition`. original commit: b520b66c4e8e54909c7d7b1126044e984989e8ef
31 lines
1.4 KiB
Racket
31 lines
1.4 KiB
Racket
#lang scheme/base
|
|
(require "private/provide-structs.rkt"
|
|
racket/contract/base
|
|
xml/xexpr
|
|
net/url-structs)
|
|
|
|
(provide-structs
|
|
[body-id ([value string?])]
|
|
[hover-property ([text string?])]
|
|
[script-property ([type string?]
|
|
[script (or/c path-string? (listof string?))])]
|
|
[css-addition ([path (or/c path-string? (cons/c 'collects (listof bytes?)) url? bytes?)])]
|
|
[js-addition ([path (or/c path-string? (cons/c 'collects (listof bytes?)) url? bytes?)])]
|
|
[html-defaults ([prefix-path (or/c bytes? path-string? (cons/c 'collects (listof bytes?)))]
|
|
[style-path (or/c bytes? path-string? (cons/c 'collects (listof bytes?)))]
|
|
[extra-files (listof (or/c path-string? (cons/c 'collects (listof bytes?))))])]
|
|
[css-style-addition ([path (or/c path-string? (cons/c 'collects (listof bytes?)) url? bytes?)])]
|
|
[js-style-addition ([path (or/c path-string? (cons/c 'collects (listof bytes?)) url? bytes?)])]
|
|
|
|
[url-anchor ([name string?])]
|
|
[alt-tag ([name (and/c string? #rx"^[a-zA-Z0-9]+$")])]
|
|
[attributes ([assoc (listof (cons/c symbol? string?))])]
|
|
[column-attributes ([assoc (listof (cons/c symbol? string?))])]
|
|
|
|
[part-link-redirect ([url url?])]
|
|
[install-resource ([path path-string?])]
|
|
[link-resource ([path path-string?])]
|
|
|
|
[head-extra ([xexpr xexpr/c])]
|
|
[render-convertible-as ([types (listof (or/c 'png-bytes 'svg-bytes))])])
|