From owner-freebsd-doc Sun Nov 5 11: 9:20 2000 Delivered-To: freebsd-doc@freebsd.org Received: from nothing-going-on.demon.co.uk (nothing-going-on.demon.co.uk [193.237.89.66]) by hub.freebsd.org (Postfix) with ESMTP id E1ACF37B479 for ; Sun, 5 Nov 2000 11:09:13 -0800 (PST) Received: (from nik@localhost) by nothing-going-on.demon.co.uk (8.11.0/8.11.0) id eA5JA5L41145; Sun, 5 Nov 2000 19:10:05 GMT (envelope-from nik) Date: Sun, 5 Nov 2000 19:10:04 +0000 From: Nik Clayton To: Sheldon Hearn Cc: freebsd-doc@freebsd.org Subject: Re: REQ: Help finishing off docbook conversion Message-ID: <20001105191004.A41098@canyon.nothing-going-on.org> References: <542.973205374@axl.fw.uunet.co.za> Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="vkogqOf2sHV7VnPd" Content-Disposition: inline User-Agent: Mutt/1.2.5i In-Reply-To: <542.973205374@axl.fw.uunet.co.za>; from sheldonh@uunet.co.za on Fri, Nov 03, 2000 at 12:49:34AM +0200 Organization: FreeBSD Project Sender: owner-freebsd-doc@FreeBSD.ORG Precedence: bulk X-Loop: FreeBSD.org --vkogqOf2sHV7VnPd Content-Type: text/plain; charset=us-ascii Content-Disposition: inline On Fri, Nov 03, 2000 at 12:49:34AM +0200, Sheldon Hearn wrote: > I've done most of the work of translating my HTML version of Chapter 2 > of The Design and Implementation of the 4.4BSD Operating System. > > The outstanding items are: > > * A table. Done. > * The bibliography and in-document cross-references into it. Done. > If any docbook guru would like to help me out, please mail the list back > to let everyone know that you're going to tackle it (to avoid > duplication of effort) and pick up the tarball at: > > http://people.freebsd.org/~sheldonh/design-44bsd.tar.gz http://people.freebsd.org/~nik/design-44bsd.tar.gz Give that the once over. I haven't finished re-indenting some of the lines. Also, there's a problem with the ToC generation, which I've never seen before. Finally, the attached patch to freebsd.dsl ensures that the biblio xrefs get a '[' and ']' around them, as necessary. Comments? N -- Internet connection, $19.95 a month. Computer, $799.95. Modem, $149.95. Telephone line, $24.95 a month. Software, free. USENET transmission, hundreds if not thousands of dollars. Thinking before posting, priceless. Somethings in life you can't buy. For everything else, there's MasterCard. -- Graham Reed, in the Scary Devil Monastery --vkogqOf2sHV7VnPd Content-Type: text/plain; charset=us-ascii Content-Disposition: attachment; filename=diff Index: freebsd.dsl =================================================================== RCS file: /home/ncvs/doc/share/sgml/freebsd.dsl,v retrieving revision 1.19 diff -u -r1.19 freebsd.dsl --- freebsd.dsl 2000/10/28 21:14:44 1.19 +++ freebsd.dsl 2000/11/05 19:08:23 @@ -300,18 +300,17 @@ (make element gi: "A" attributes: (list (list "NAME" (element-id))) (empty-sosofo)) - (make element gi: "B" + (make element gi: "B" (literal (question-answer-label (current-node)) " ") - (process-node-list (children firstch))))) + (process-node-list (children firstch))))) (process-node-list restch)))) ]]> (element docinfo (process-children)) - (element (docinfo authorgroup) (process-children)) - (element (docinfo date) (process-children)) + (element (docinfo legalnotice) (process-children)) (element literallayout @@ -343,6 +342,37 @@ (string-append "Q" (question-answer-label))) (else (string-append "AEN" (number->string (all-element-number nd)))))) + + + (define (xref-biblioentry target) + (let* ((abbrev (node-list-first + (node-list-filter-out-pis (children target)))) + (label (attribute-string (normalize "xreflabel") target))) + + (if biblio-xref-title + (let* ((citetitles (select-elements (descendants target) + (normalize "citetitle"))) + (titles (select-elements (descendants target) + (normalize "title"))) + (title (if (node-list-empty? citetitles) + (node-list-first titles) + (node-list-first citetitles)))) + (with-mode xref-title-mode + (process-node-list title))) + (if biblio-number + (make sequence + (literal "[" (number->string (bibentry-number target)) "]")) + (if label + (make sequence + (literal "[" label "]")) + (if (equal? (gi abbrev) (normalize "abbrev")) + (make sequence + (literal "[") + (process-node-list abbrev) + (literal "]")) + (make sequence + (literal "[" (id target) "]")))))))) --vkogqOf2sHV7VnPd-- To Unsubscribe: send mail to majordomo@FreeBSD.org with "unsubscribe freebsd-doc" in the body of the message