diff --git a/sgml/freebsd.dsl b/sgml/freebsd.dsl index fd01b89c0d..c90a4fd4f2 100644 --- a/sgml/freebsd.dsl +++ b/sgml/freebsd.dsl @@ -1,102 +1,121 @@ ]> + (define %stylesheet% + "handbook.css") + (define %gentext-nav-use-tables% ;; Use tables to build the navigation headers and footers? #t) (define %html-ext% ;; Default extension for HTML output files ".html") (define %shade-verbatim% ;; Should verbatim environments be shaded? #f) (define %use-id-as-filename% ;; Use ID attributes as name for component HTML files? #t) (define %root-filename% ;; Name for the root HTML document "index") (element sgmltag ($mono-seq$ (make sequence (literal "<") (process-children) (literal ">")))) (element command ($mono-seq$)) (element application ($bold-seq$)) + + (element warning ($admonition$)) + (element (warning title) (empty-sosofo)) + (element (warning para) ($admonpara$)) + (element (warning simpara) ($admonpara$)) + (element caution ($admonition$)) + (element (caution title) (empty-sosofo)) + (element (caution para) ($admonpara$)) + (element (caution simpara) ($admonpara$)) + + (define usen-warning-label-title-sep ": ") + (define usen-caution-label-title-sep ": ") + (element hostid ($mono-seq$)) (element username ($mono-seq$)) (element devicename ($mono-seq$)) (element maketarget ($mono-seq$)) (element makevar ($mono-seq$)) (define ($verbatim-display$ line-numbers?) (let ((content (make element gi: "BLOCKQUOTE" attributes: (list (list "CLASS" (gi))) (make element gi: "PRE" (if line-numbers? ($verbatim-content-with-linenumbers$) ($verbatim-content$)))))) (if %shade-verbatim% (make element gi: "TABLE" attributes: ($shade-verbatim-attr$) (make element gi: "TR" (make element gi: "TD" content))) content)))