- (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() ?>")