Add support for the 'vendor' attribute on <citerefentry> to select which
of the CGI manual page collections to use. Currently supports XFree86, NetBSD, and FreeBSD Port man pages.
This commit is contained in:
Marc Fonvieille
parent
ea1af70d8c
commit
dd2b4d6698
Notes:
svn2git
2020-12-08 03:00:23 +00:00
svn path=/head/; revision=14042
7 changed files with 80 additions and 25 deletions
|
|
@ -41,9 +41,17 @@
|
|||
(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))
|
||||
(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.0.2"))
|
||||
(("netbsd") (string-append u "&" "manpath=NetBSD+1.5"))
|
||||
(("ports") (string-append u "&" "manpath=FreeBSD+Ports"))
|
||||
(else u))))
|
||||
]]>
|
||||
</style-specification-body>
|
||||
</style-specification>
|
||||
|
|
|
|||
|
|
@ -53,9 +53,17 @@
|
|||
(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))
|
||||
(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.0.2"))
|
||||
(("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 -->
|
||||
|
|
|
|||
|
|
@ -1,4 +1,4 @@
|
|||
<!-- $FreeBSD: doc/en_US.ISO8859-1/share/sgml/freebsd.dsl,v 1.13 2001/08/03 19:11:16 murray Exp $ -->
|
||||
<!-- $FreeBSD$ -->
|
||||
|
||||
<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
|
||||
<!ENTITY freebsd.dsl PUBLIC "-//FreeBSD//DOCUMENT DocBook Language Neutral Stylesheet//EN" CDATA DSSSL>
|
||||
|
|
@ -53,9 +53,17 @@
|
|||
(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))
|
||||
(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.0.2"))
|
||||
(("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 -->
|
||||
|
|
|
|||
|
|
@ -2,7 +2,7 @@
|
|||
The FreeBSD Documentation Project
|
||||
The FreeBSD French Documentation Project
|
||||
|
||||
$Id: freebsd.dsl,v 1.7 2002-06-29 13:26:59 blackend Exp $
|
||||
$Id: freebsd.dsl,v 1.8 2002-08-27 14:11:19 blackend Exp $
|
||||
$FreeBSD$
|
||||
Original revision: 1.3
|
||||
|
||||
|
|
@ -57,10 +57,17 @@
|
|||
(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))
|
||||
|
||||
(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.0.2"))
|
||||
(("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 -->
|
||||
|
|
|
|||
|
|
@ -53,9 +53,17 @@
|
|||
(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))
|
||||
(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.0.2"))
|
||||
(("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 -->
|
||||
|
|
|
|||
|
|
@ -53,9 +53,17 @@
|
|||
(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))
|
||||
(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.0.2"))
|
||||
(("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 -->
|
||||
|
|
|
|||
|
|
@ -69,10 +69,18 @@
|
|||
(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))
|
||||
]]>
|
||||
(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.0.2"))
|
||||
(("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 -->
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue