]]> ]]> ]> ;; ==================== ;; customize the print stylesheet ;; ==================== ;; make funcsynopsis look pretty (define %funcsynopsis-decoration% ;; Decorate elements of a FuncSynopsis? #t) ;; fix some of the document attributes (define %left-margin% 10mm) (define %right-margin% 15mm) (define %top-margin% 10mm) (define %bottom-margin% 10mm) (define %paper-type% "A4") ;; fix some stuff about tables ;; there should be way to set the tables width ;; fix some stuff about graphics (figures) ;; there should be way to get graphics in the right width (define %graphic-default-extension% "eps") ;; misc stuff from the original dsl driver (declare-characteristic preserve-sdata? "UNREGISTERED::James Clark//Characteristic::preserve-sdata?" #f) (define %two-side% #t) (define %section-autolabel% #t) (define %generate-part-toc% #t) ; make sure the formation.css stylesheet is used (define %stylesheet% "./formation.css") ;; this is necessary because right now jadetex does not understand ;; symbolic entities, whereas things work well with numeric entities. (declare-characteristic preserve-sdata? "UNREGISTERED::James Clark//Characteristic::preserve-sdata?" #f) ;; put the legal notice in a separate file (define %generate-legalnotice-link% #t) ;; use graphics in admonitions, and have their path be "stylesheet-images" ;; NO: they do not yet look very good (define %admon-graphics-path% "./stylesheet-images/") (define %admon-graphics% #f) ;; make funcsynopsis look pretty (define %funcsynopsis-decoration% ;; Decorate elements of a FuncSynopsis? #t) (define %html-ext% ".html") (define %body-attr% '()) (define %generate-article-toc% #t) (define %generate-part-toc% #t) (define %shade-verbatim% #t) (define %use-id-as-filename% ;; Use ID attributes as name for component HTML files? #t) (define %graphic-default-extension% "gif")