From owner-freebsd-doc@FreeBSD.ORG Sat Apr 26 08:02:32 2003 Return-Path: Delivered-To: freebsd-doc@freebsd.org Received: from mx1.FreeBSD.org (mx1.freebsd.org [216.136.204.125]) by hub.freebsd.org (Postfix) with ESMTP id 025D737B404 for ; Sat, 26 Apr 2003 08:02:31 -0700 (PDT) Received: from smtp.eos.ocn.ne.jp (eos.ocn.ne.jp [211.6.83.117]) by mx1.FreeBSD.org (Postfix) with ESMTP id 1F50043FBF for ; Sat, 26 Apr 2003 08:02:29 -0700 (PDT) (envelope-from hrs@eos.ocn.ne.jp) Received: from mail.allbsd.org (p53054-adsao12honb4-acca.tokyo.ocn.ne.jp [220.96.135.54]) by smtp.eos.ocn.ne.jp (Postfix) with ESMTP id 4A92D293F; Sun, 27 Apr 2003 00:02:28 +0900 (JST) Received: from localhost (alph.allbsd.org [192.168.0.10]) h3QF12Jp015937; Sun, 27 Apr 2003 00:01:03 +0900 (JST) (envelope-from hrs@eos.ocn.ne.jp) Date: Sat, 26 Apr 2003 23:54:34 +0900 (JST) Message-Id: <20030426.235434.116360718.hrs@eos.ocn.ne.jp> To: sysadmin@alexdupre.com From: Hiroki Sato In-Reply-To: <193879609822.20030423194209@alexdupre.com> References: <20030424.021109.59657888.hrs@eos.ocn.ne.jp> <193879609822.20030423194209@alexdupre.com> X-PGPkey-fingerprint: BDB3 443F A5DD B3D0 A530 FFD7 4F2C D3D8 2793 CF2D X-Mailer: Mew version 2.2 on Emacs 20.7 / Mule 4.0 (HANANOEN) Mime-Version: 1.0 Content-Type: Multipart/Mixed; boundary="--Next_Part(Sat_Apr_26_23:54:34_2003_171)--" Content-Transfer-Encoding: 7bit cc: doc@freebsd.org Subject: Re: doc/{,}/share/sgml/catalog X-BeenThere: freebsd-doc@freebsd.org X-Mailman-Version: 2.1.1 Precedence: list List-Id: Documentation project List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Sat, 26 Apr 2003 15:02:32 -0000 ----Next_Part(Sat_Apr_26_23:54:34_2003_171)-- Content-Type: Text/Plain; charset=us-ascii Content-Transfer-Encoding: 7bit Alex Dupre wrote in <193879609822.20030423194209@alexdupre.com>: sysadmin> Wednesday, April 23, 2003, 7:11:09 PM, you wrote: sysadmin> sysadmin> HS> I think it is reasonable to put non-English and language-specific sysadmin> HS> entries in doc/share/sgml/catalog into doc//share/sgml/catalog. sysadmin> HS> They are in doc/share/sgml/catalog together now, but not needed sysadmin> HS> to be there. sysadmin> sysadmin> If they are not needed, I completely agree with you. In this case I sysadmin> give you the permission to apply the Italian part of the patch to the sysadmin> tree. Thanks. What do people who responsible for the other languages think? In addition I have a patch for language-specific freebsd.dsl. Changes including this are not just cosmetic---for example, a definition of ($create-refentry-xref-link$) in en_US.ISO8859-1/share/sgml/freebsd.dsl was changed by nik (r1.14->r1.15), but since es_ES.ISO8859-1/share/sgml/freebsd.dsl is not updated, you probably see a warning during the build of es_ES.ISO8859-1/. To avoid such situation, ($create-refentry-xref-link$) should be in doc/share/sgml/freebsd.dsl, I think. If we want a language-specific procedure we can always pre-define (override) in /share/sgml/freebsd.dsl, so most of the procedures in the current en_US.ISO8859-1/share/sgml/freebsd.dsl can be moved into doc/share/sgml/freebsd.dsl. -- | Hiroki SATO / ----Next_Part(Sat_Apr_26_23:54:34_2003_171)-- Content-Type: Text/Plain; charset=us-ascii Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="doc.xref.diff" Index: da_DK.ISO8859-1/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/da_DK.ISO8859-1/share/sgml/freebsd.dsl,v retrieving revision 1.1 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.1 freebsd.dsl --- da_DK.ISO8859-1/share/sgml/freebsd.dsl 9 Mar 2003 21:25:19 -0000 1.1 +++ da_DK.ISO8859-1/share/sgml/freebsd.dsl 26 Apr 2003 13:25:38 -0000 @@ -13,6 +13,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -40,31 +44,6 @@ (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("current") (string-append u "&" "manpath=FreeBSD+5.0-current")) - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: de_DE.ISO8859-1/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/de_DE.ISO8859-1/share/sgml/freebsd.dsl,v retrieving revision 1.12 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.12 freebsd.dsl --- de_DE.ISO8859-1/share/sgml/freebsd.dsl 4 Feb 2003 00:34:26 -0000 1.12 +++ de_DE.ISO8859-1/share/sgml/freebsd.dsl 26 Apr 2003 13:26:07 -0000 @@ -15,6 +15,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -31,31 +35,6 @@ attributes: (list (list "href" "mailto:de-bsd-translators@de.FreeBSD.org")) (literal "de-bsd-translators@de.FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("current") (string-append u "&" "manpath=FreeBSD+5.0-current")) - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: el_GR.ISO8859-7/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/el_GR.ISO8859-7/share/sgml/freebsd.dsl,v retrieving revision 1.3 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.3 freebsd.dsl --- el_GR.ISO8859-7/share/sgml/freebsd.dsl 21 Sep 2002 21:11:58 -0000 1.3 +++ el_GR.ISO8859-7/share/sgml/freebsd.dsl 26 Apr 2003 13:26:30 -0000 @@ -13,6 +13,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -40,30 +44,6 @@ (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: en_US.ISO8859-1/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/en_US.ISO8859-1/share/sgml/freebsd.dsl,v retrieving revision 1.18 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.18 freebsd.dsl --- en_US.ISO8859-1/share/sgml/freebsd.dsl 19 Apr 2003 11:39:28 -0000 1.18 +++ en_US.ISO8859-1/share/sgml/freebsd.dsl 26 Apr 2003 13:22:19 -0000 @@ -17,6 +17,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -45,30 +49,6 @@ (literal "doc@FreeBSD.org")) (literal ">."))))) - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("current") (string-append u "&" "manpath=FreeBSD+5.0-current")) - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: es_ES.ISO8859-1/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/es_ES.ISO8859-1/share/sgml/freebsd.dsl,v retrieving revision 1.8 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.8 freebsd.dsl --- es_ES.ISO8859-1/share/sgml/freebsd.dsl 3 Nov 2002 12:48:18 -0000 1.8 +++ es_ES.ISO8859-1/share/sgml/freebsd.dsl 26 Apr 2003 13:24:02 -0000 @@ -13,6 +13,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -40,22 +44,6 @@ (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ refentrytitle manvolnum) - (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - refentrytitle "&" "sektion=" manvolnum)) ]]> Index: fr_FR.ISO8859-1/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/fr_FR.ISO8859-1/share/sgml/freebsd.dsl,v retrieving revision 1.11 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.11 freebsd.dsl --- fr_FR.ISO8859-1/share/sgml/freebsd.dsl 11 Dec 2002 20:06:19 -0000 1.11 +++ fr_FR.ISO8859-1/share/sgml/freebsd.dsl 26 Apr 2003 13:27:32 -0000 @@ -19,6 +19,10 @@ + (define %refentry-xref-link% #t) + - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("current") (string-append u "&" "manpath=FreeBSD+5.0-current")) - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: it_IT.ISO8859-15/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/it_IT.ISO8859-15/share/sgml/freebsd.dsl,v retrieving revision 1.5 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.5 freebsd.dsl --- it_IT.ISO8859-15/share/sgml/freebsd.dsl 19 Mar 2003 18:54:56 -0000 1.5 +++ it_IT.ISO8859-15/share/sgml/freebsd.dsl 26 Apr 2003 13:27:57 -0000 @@ -18,6 +18,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -45,31 +49,6 @@ (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("current") (string-append u "&" "manpath=FreeBSD+5.0-current")) - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: nl_NL.ISO8859-1/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/nl_NL.ISO8859-1/share/sgml/freebsd.dsl,v retrieving revision 1.3 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.3 freebsd.dsl --- nl_NL.ISO8859-1/share/sgml/freebsd.dsl 21 Sep 2002 21:12:05 -0000 1.3 +++ nl_NL.ISO8859-1/share/sgml/freebsd.dsl 26 Apr 2003 13:28:48 -0000 @@ -13,6 +13,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -40,30 +44,6 @@ (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: pl_PL.ISO8859-2/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/pl_PL.ISO8859-2/share/sgml/freebsd.dsl,v retrieving revision 1.1 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.1 freebsd.dsl --- pl_PL.ISO8859-2/share/sgml/freebsd.dsl 26 Sep 2002 17:51:34 -0000 1.1 +++ pl_PL.ISO8859-2/share/sgml/freebsd.dsl 26 Apr 2003 13:29:22 -0000 @@ -18,6 +18,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -45,30 +49,6 @@ (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: pt_BR.ISO8859-1/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/pt_BR.ISO8859-1/share/sgml/freebsd.dsl,v retrieving revision 1.3 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.3 freebsd.dsl --- pt_BR.ISO8859-1/share/sgml/freebsd.dsl 21 Sep 2002 21:12:09 -0000 1.3 +++ pt_BR.ISO8859-1/share/sgml/freebsd.dsl 26 Apr 2003 13:30:05 -0000 @@ -29,6 +29,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -56,30 +60,6 @@ (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: sr_YU.ISO8859-2/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/sr_YU.ISO8859-2/share/sgml/freebsd.dsl,v retrieving revision 1.1 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.1 freebsd.dsl --- sr_YU.ISO8859-2/share/sgml/freebsd.dsl 7 May 2001 18:25:56 -0000 1.1 +++ sr_YU.ISO8859-2/share/sgml/freebsd.dsl 26 Apr 2003 13:31:08 -0000 @@ -44,14 +44,6 @@ attributes: (list (list "href" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) ]]> (define %html-header-tags% '(("META" ("HTTP-EQUIV" "Content-Type") ("CONTENT" "text/html; charset=iso-8859-2")))) Index: zh_TW.Big5/share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/zh_TW.Big5/share/sgml/freebsd.dsl,v retrieving revision 1.4 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.4 freebsd.dsl --- zh_TW.Big5/share/sgml/freebsd.dsl 20 Jan 2003 06:41:37 -0000 1.4 +++ zh_TW.Big5/share/sgml/freebsd.dsl 26 Apr 2003 13:31:31 -0000 @@ -13,6 +13,10 @@ + (define %refentry-xref-link% #t) + (define ($email-footer$) (make sequence (make element gi: "p" @@ -40,31 +44,6 @@ (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) (literal "doc@FreeBSD.org")) (literal ">."))))) - - - - (element quote - (make sequence - (literal "``") - (process-children) - (literal "''"))) - - - (define %refentry-xref-link% #t) - - - (define ($create-refentry-xref-link$ #!optional (n (current-node))) - (let* ((r (select-elements (children n) (normalize "refentrytitle"))) - (m (select-elements (children n) (normalize "manvolnum"))) - (v (attribute-string (normalize "vendor") n)) - (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m)))) - (case v - (("current") (string-append u "&" "manpath=FreeBSD+5.0-current")) - (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) - (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) - (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) - (else u)))) ]]> Index: share/sgml/freebsd.dsl =================================================================== RCS file: /home/dcvs/doc/share/sgml/freebsd.dsl,v retrieving revision 1.70 diff -d -u -I\$FreeBSD:.*\$ -I\$Id:.*\$ -I\$hrs:.*\$ -r1.70 freebsd.dsl --- share/sgml/freebsd.dsl 19 Apr 2003 11:39:30 -0000 1.70 +++ share/sgml/freebsd.dsl 26 Apr 2003 13:22:06 -0000 @@ -182,9 +182,19 @@ ;; /REFENTRY #f) - ; Empty function to quiet warnings - (define ($create-refentry-xref-link$) - (literal "")) + + (define ($create-refentry-xref-link$ #!optional (n (current-node))) + (let* ((r (select-elements (children n) (normalize "refentrytitle"))) + (m (select-elements (children n) (normalize "manvolnum"))) + (v (attribute-string (normalize "vendor") n)) + (u (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" + (data r) "&" "sektion=" (data m)))) + (case v + (("current") (string-append u "&" "manpath=FreeBSD+5.0-current")) + (("xfree86") (string-append u "&" "manpath=XFree86+4.2.0")) + (("netbsd") (string-append u "&" "manpath=NetBSD+1.5")) + (("ports") (string-append u "&" "manpath=FreeBSD+Ports")) + (else u)))) (element citerefentry (let ((href ($create-refentry-xref-link$))) @@ -214,6 +224,13 @@ ;; textobject (define preferred-mediaobject-notations '()) + + + (element quote + (make sequence + (literal "``") + (process-children) + (literal "''"))) ]]> ----Next_Part(Sat_Apr_26_23:54:34_2003_171)----