X-Git-Url: http://git.indexdata.com/?p=yaz-moved-to-github.git;a=blobdiff_plain;f=doc%2Fyazphp.dsl;fp=doc%2Fyazphp.dsl;h=0000000000000000000000000000000000000000;hp=e621b425957094a2dd4e9435b24118ab31aaa8c8;hb=96809bad943557af7ac0d01d78ed7fc18dc18436;hpb=828c5ea4da2289925cbb665082b9e6df304812bb

diff --git a/doc/yazphp.dsl b/doc/yazphp.dsl
deleted file mode 100644
index e621b42..0000000
--- a/doc/yazphp.dsl
+++ /dev/null
@@ -1,98 +0,0 @@
-<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
-<!ENTITY docbook.dsl SYSTEM "/usr/share/sgml/docbook/stylesheet/dsssl/modular/html/docbook.dsl"
-  CDATA DSSSL>
-]>
-<!--
-  $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 newline "\U-000D")
-
-(define (html-document title-sosofo body-sosofo)
-  (let* (;; Let's look these up once, so that we can avoid calculating
-         ;; them over and over again.
-         (prev         (prev-chunk-element))
-         (next         (next-chunk-element))
-         (prevm        (prev-major-component-chunk-element))
-         (nextm        (next-major-component-chunk-element))
-         (navlist      (list prev next prevm nextm))
-	 
-         ;; Let's make it possible to control the output even in the
-         ;; nochunks case. Note: in the nochunks case, (chunk?) will
-         ;; return #t for only the root element.
-         (make-entity? (and (or (not nochunks) rootchunk)
-                            (chunk?)))
-	 
-         (make-head?   (or make-entity?
-                           (and nochunks
-                                (node-list=? (current-node)
-                                             (sgml-root-element)))))
-         (doc-sosofo 
-          (if make-head?
-	      (make sequence
-		(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() ?>")
-		      )
-		)
-	      body-sosofo
-	      )
-	  )
-	 )
-    (if make-entity?
-	(make entity
-	  system-id: (html-entity-file (html-file))
-	  (if %html-pubid%
-	      (make document-type
-		name: "HTML"
-		public-id: %html-pubid%)
-	      (empty-sosofo))
-	  doc-sosofo)
-	(if (node-list=? (current-node) (sgml-root-element))
-	    (make sequence
-	      (if %html-pubid%
-		  (make document-type
-		    name: "HTML"
-		    public-id: %html-pubid%)
-		  (empty-sosofo))
-	      doc-sosofo)
-	    doc-sosofo)
-	)
-    )
-  )
-
-</style-specification-body>
-</style-specification>
-<external-specification id="docbook" document="docbook.dsl">
-</style-sheet>
-
-<!--
-Local Variables:
-mode: scheme
-End:
--->