diff options
author | blackend <blackend@FreeBSD.org> | 2002-08-28 21:26:33 +0000 |
---|---|---|
committer | blackend <blackend@FreeBSD.org> | 2002-08-28 21:26:33 +0000 |
commit | 27ad5a20e288d728ed8df0e28ec9d31972402a9c (patch) | |
tree | d7ff40c07f6aa56e5716ca3c070ed51318a684c5 | |
parent | bf4ebb4609b4f7c170352f83aa3bf4a4fc663a5b (diff) | |
download | FreeBSD-src-27ad5a20e288d728ed8df0e28ec9d31972402a9c.zip FreeBSD-src-27ad5a20e288d728ed8df0e28ec9d31972402a9c.tar.gz |
Fix the generation of the HTML manual page link according to new
doc/share/sgml/freebsd.dsl
Signaled by: bmah
4 files changed, 20 insertions, 12 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 ed56da4..5616f4b 100644 --- a/release/doc/de_DE.ISO8859-1/share/sgml/release.dsl +++ b/release/doc/de_DE.ISO8859-1/share/sgml/release.dsl @@ -66,10 +66,12 @@ (define %refentry-xref-link% #t) <!-- Specify how to generate the man page link HREF --> - (define ($create-refentry-xref-link$ refentrytitle manvolnum) + (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=" - refentrytitle "&" "sektion=" manvolnum - "&" "manpath=FreeBSD+5.0-current")) + (data r) "&" "sektion=" (data m) + "&" "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 80a18f4..089c4de 100644 --- a/release/doc/en_US.ISO8859-1/share/sgml/release.dsl +++ b/release/doc/en_US.ISO8859-1/share/sgml/release.dsl @@ -61,10 +61,12 @@ (define %refentry-xref-link% #t) <!-- Specify how to generate the man page link HREF --> - (define ($create-refentry-xref-link$ refentrytitle manvolnum) + (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=" - refentrytitle "&" "sektion=" manvolnum - "&" "manpath=FreeBSD+5.0-current")) + (data r) "&" "sektion=" (data m) + "&" "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 6824f04..fb9889a 100644 --- a/release/doc/fr_FR.ISO8859-1/share/sgml/release.dsl +++ b/release/doc/fr_FR.ISO8859-1/share/sgml/release.dsl @@ -68,10 +68,12 @@ (define %refentry-xref-link% #t) <!-- Specify how to generate the man page link HREF --> - (define ($create-refentry-xref-link$ refentrytitle manvolnum) + (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=" - refentrytitle "&" "sektion=" manvolnum - "&" "manpath=FreeBSD+5.0-current")) + (data r) "&" "sektion=" (data m) + "&" "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 84151bf..0f497dd 100644 --- a/release/doc/ja_JP.eucJP/share/sgml/release.dsl +++ b/release/doc/ja_JP.eucJP/share/sgml/release.dsl @@ -68,10 +68,12 @@ (define %refentry-xref-link% #t) <!-- Specify how to generate the man page link HREF --> - (define ($create-refentry-xref-link$ refentrytitle manvolnum) + (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=" - refentrytitle "&" "sektion=" manvolnum - "&" "manpath=FreeBSD+5.0-current")) + (data r) "&" "sektion=" (data m) + "&" "manpath=FreeBSD+5.0-current"))) ]]> (define (toc-depth nd) |