diff options
| -rw-r--r-- | release/doc/de_DE.ISO8859-1/share/sgml/release.dsl | 13 | ||||
| -rw-r--r-- | release/doc/en_US.ISO8859-1/share/sgml/release.dsl | 13 | ||||
| -rw-r--r-- | release/doc/fr_FR.ISO8859-1/share/sgml/release.dsl | 13 | ||||
| -rw-r--r-- | release/doc/ja_JP.eucJP/share/sgml/release.dsl | 13 |
4 files changed, 36 insertions, 16 deletions
diff --git a/release/doc/de_DE.ISO8859-1/share/sgml/release.dsl b/release/doc/de_DE.ISO8859-1/share/sgml/release.dsl index 5616f4bfe617..11b5ce6973c5 100644 --- a/release/doc/de_DE.ISO8859-1/share/sgml/release.dsl +++ b/release/doc/de_DE.ISO8859-1/share/sgml/release.dsl @@ -68,10 +68,15 @@ <!-- 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")))) - (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m) - "&" "manpath=FreeBSD+5.0-current"))) + (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 (string-append u "&" "manpath=FreeBSD+5.0-current"))))) (define (toc-depth nd) (if (string=? (gi nd) (normalize "book")) diff --git a/release/doc/en_US.ISO8859-1/share/sgml/release.dsl b/release/doc/en_US.ISO8859-1/share/sgml/release.dsl index 089c4de4ac01..688af05481b9 100644 --- a/release/doc/en_US.ISO8859-1/share/sgml/release.dsl +++ b/release/doc/en_US.ISO8859-1/share/sgml/release.dsl @@ -63,10 +63,15 @@ <!-- 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")))) - (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m) - "&" "manpath=FreeBSD+5.0-current"))) + (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 (string-append u "&" "manpath=FreeBSD+5.0-current"))))) ]]> (define (toc-depth nd) diff --git a/release/doc/fr_FR.ISO8859-1/share/sgml/release.dsl b/release/doc/fr_FR.ISO8859-1/share/sgml/release.dsl index fb9889a4ff90..3030730ef943 100644 --- a/release/doc/fr_FR.ISO8859-1/share/sgml/release.dsl +++ b/release/doc/fr_FR.ISO8859-1/share/sgml/release.dsl @@ -70,10 +70,15 @@ <!-- 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")))) - (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m) - "&" "manpath=FreeBSD+5.0-current"))) + (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 (string-append u "&" "manpath=FreeBSD+5.0-current"))))) ]]> (define (toc-depth nd) diff --git a/release/doc/ja_JP.eucJP/share/sgml/release.dsl b/release/doc/ja_JP.eucJP/share/sgml/release.dsl index 0f497dd22d05..83ff5bb2362a 100644 --- a/release/doc/ja_JP.eucJP/share/sgml/release.dsl +++ b/release/doc/ja_JP.eucJP/share/sgml/release.dsl @@ -70,10 +70,15 @@ <!-- 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")))) - (string-append "http://www.FreeBSD.org/cgi/man.cgi?query=" - (data r) "&" "sektion=" (data m) - "&" "manpath=FreeBSD+5.0-current"))) + (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 (string-append u "&" "manpath=FreeBSD+5.0-current"))))) ]]> (define (toc-depth nd) |