<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
-<!ENTITY docbook.dsl SYSTEM "/home/adam/proj/docbook-dsssl-1.70/html/docbook.dsl" CDATA DSSSL>
-<!-- ENTITY docbook.dsl SYSTEM "/usr/lib/sgml/stylesheet/dsssl/docbook/nwalsh/html/docbook.dsl" CDATA DSSSL -->
-<!ENTITY html-common.dsl SYSTEM "./html-common.dsl">
+<!ENTITY docbook.dsl SYSTEM "/usr/share/sgml/docbook/stylesheet/dsssl/modular/html/docbook.dsl"
+ CDATA DSSSL>
]>
<!--
- $Header: /home/cvsroot/yaz/doc/Attic/yazphp.dsl,v 1.1 2001-07-19 12:46:57 adam Exp $
+ $Id: yazphp.dsl,v 1.5 2001-10-24 09:27:59 adam Exp $
-->
<style-sheet>
<style-specification use="docbook">
<style-specification-body>
+(define %use-id-as-filename% #t)
+(define %output-dir% "php")
(define %html-ext% ".php")
(define %shade-verbatim% #t)
-(define (php-code code)
- (make processing-instruction
- data: (string-append "php " code "?")))
+(define newline "\U-000D")
(define (html-document title-sosofo body-sosofo)
(let* (;; Let's look these up once, so that we can avoid calculating
(doc-sosofo
(if make-head?
(make sequence
- (php-code "require \"../id_common.inc\"")
- (make element gi: "HTML"
- (make element gi: "HEAD"
- (make element gi: "TITLE " title-sosofo)
- ($standard-html-header$ prev next prevm nextm))
- (make element gi: "BODY"
- attributes: (append
- (list (list "CLASS" (gi)))
- %body-attr%)
- (header-navigation (current-node) navlist)
- body-sosofo
- (footer-navigation (current-node) navlist)
- )
+ (make formatting-instruction data:
+ (string-append "<" "?php "
+ newline
+ "require \"../../id_common.inc\";"
+ newline
+ "id_header(\""
+ )
+ )
+ title-sosofo
+ (make formatting-instruction data:
+ (string-append "\");"
+ newline
+ "?" ">"
+ )
+ )
+ (header-navigation (current-node) navlist)
+ body-sosofo
+ (footer-navigation (current-node) navlist)
+ (make formatting-instruction data:
+ (string-append "<" "?php id_footer() ?>")
)
- (php-code "id_footer();")
)
body-sosofo
)
public-id: %html-pubid%)
(empty-sosofo))
doc-sosofo)
- doc-sosofo))))
+ doc-sosofo)
+ )
+ )
+ )
</style-specification-body>
</style-specification>
<external-specification id="docbook" document="docbook.dsl">
</style-sheet>
-
+
+<!--
+Local Variables:
+mode: scheme
+End:
+-->