doc/{,<langcode>}/share/sgml/catalog

Hiroki Sato hrs at eos.ocn.ne.jp
Sat Apr 26 15:02:32 UTC 2003


Alex Dupre <sysadmin at alexdupre.com> wrote
  in <193879609822.20030423194209 at 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/<langcode>/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
 <langcode>/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  <hrs at eos.ocn.ne.jp> / <hrs at FreeBSD.org>
-------------- next part --------------
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 @@
       <!-- HTML only .................................................... -->
  
       <![ %output.html; [ 
+
+        <!-- Generate links to HTML man pages -->
+        (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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
       ]]>
 
       <!-- More aesthetically pleasing chapter headers for print output --> 
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 @@
     <style-specification-body>
  
       <![ %output.html; [ 
+
+        <!-- Generate links to HTML man pages -->
+        (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 at de.FreeBSD.org"))
                   (literal "de-bsd-translators at de.FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
       ]]>
     </style-specification-body>
   </style-specification>
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 @@
       <!-- HTML only .................................................... -->
  
       <![ %output.html; [ 
+
+        <!-- Generate links to HTML man pages -->
+        (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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
       ]]>
 
       <!-- More aesthetically pleasing chapter headers for print output --> 
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 @@
       <!-- HTML only .................................................... -->
  
       <![ %output.html; [ 
+
+        <!-- Generate links to HTML man pages -->
+        (define %refentry-xref-link% #t)
+
 	(define ($email-footer$)
           (make sequence
 	    (make element gi: "p"
@@ -45,30 +49,6 @@
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
 
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
       ]]>
 
       <!-- More aesthetically pleasing chapter headers for print output --> 
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 @@
       <!-- HTML only .................................................... -->
  
       <![ %output.html; [ 
+
+        <!-- Generate links to HTML man pages -->
+        (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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (define ($create-refentry-xref-link$ refentrytitle manvolnum)
-	  (string-append "http://www.FreeBSD.org/cgi/man.cgi?query="
-			 refentrytitle "&" "sektion=" manvolnum))
       ]]>
 
       <!-- More aesthetically pleasing chapter headers for print output --> 
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 @@
     <style-specification-body>
  
       <![ %output.html; [ 
+
+	<!-- Generate links to HTML man pages -->                        
+        (define %refentry-xref-link% #t)                                 
+                                                                         
         <!-- Fix a problem with the French localisation.  This should really
              be a patch to the dsssl-docbook-modular port, but this gets it
              more widely available sooner.  A patch will be applied to the
@@ -54,30 +58,6 @@
                       attributes: (list (list "href" "mailto:doc at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
                 (literal ">.")))))
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-	<!-- Generate links to HTML man pages -->                        
-        (define %refentry-xref-link% #t)                                 
-                                                                         
-        <!-- Specify how to generate the man page link HREF -->          
-        (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))))
       ]]>
 	<!-- Fix a problem with the French localisation. The bug was
 	submitted to authors of docbook project -->
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 @@
       <!-- HTML only .................................................... -->
 
       <![ %output.html; [
+
+        <!-- Generate links to HTML man pages -->
+        (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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
                 (literal ">.")))))
-
-
-        <!-- Convert " ... " to `` ... '' in the HTML output. -->
-        (element quote
-          (make sequence
-            (literal "``")
-            (process-children)
-            (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
       ]]>
 
       <!-- Both sets of stylesheets ..................................... -->
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 @@
       <!-- HTML only .................................................... -->
  
       <![ %output.html; [ 
+
+        <!-- Generate links to HTML man pages -->
+        (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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
       ]]>
 
       <!-- More aesthetically pleasing chapter headers for print output --> 
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 @@
       <!-- HTML only .................................................... -->
 
       <![ %output.html; [
+
+        <!-- Generate links to HTML man pages -->
+        (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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
       ]]>
 
       <!-- More aesthetically pleasing chapter headers for print output -->
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 @@
       <!-- HTML only .................................................... -->
  
       <![ %output.html; [ 
+
+        <!-- Generate links to HTML man pages -->
+        (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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
      ]]>
 
       <!-- More aesthetically pleasing chapter headers for print output --> 
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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(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 @@
       <!-- HTML only .................................................... -->
  
       <![ %output.html; [ 
+
+        <!-- Generate links to HTML man pages -->
+        (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 at FreeBSD.org"))
                   (literal "doc at FreeBSD.org"))
 	        (literal ">.")))))
-
-
-	<!-- Convert " ... " to `` ... '' in the HTML output. -->
-	(element quote
-	  (make sequence
-	    (literal "``")
-	    (process-children)
-	    (literal "''")))
-
-        <!-- Generate links to HTML man pages -->
-        (define %refentry-xref-link% #t)
-
-        <!-- Specify how to generate the man page link HREF -->
-        (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))))
       ]]>
 
       <!-- More aesthetically pleasing chapter headers for print output --> 
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 ""))
+        <!-- Specify how to generate the man page link HREF -->
+        (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
 	  '())
+
+	<!-- Convert " ... " to `` ... '' in the HTML output. -->
+	(element quote
+	  (make sequence
+	    (literal "``")
+	    (process-children)
+	    (literal "''")))
       ]]>
 
       <!-- HTML with images  ............................................ -->


More information about the freebsd-doc mailing list