Move ($create-refentry-xref-link$) to the language-neutral place
and add entities &release.manpath.*; for man.cgi's manpath=XXX. Approved by: re (bmah)
This commit is contained in:
hrs
parent
20c957b644
commit
2a3f718d6c
@ -15,6 +15,9 @@
|
||||
<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"
|
||||
@ -53,36 +56,8 @@
|
||||
(create-link (list (list "HREF" "mailto:de-bsd-translators@de.FreeBSD.org"))
|
||||
(literal "de-bsd-translators@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
|
||||
(("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"))
|
||||
3
|
||||
3))
|
||||
|
||||
</style-specification-body>
|
||||
</style-specification>
|
||||
|
||||
|
||||
@ -11,6 +11,9 @@
|
||||
<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"
|
||||
@ -49,36 +52,8 @@
|
||||
(create-link (list (list "HREF" "mailto:doc@FreeBSD.org"))
|
||||
(literal "doc@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 (string-append u "&" "manpath=FreeBSD+5.0-current")))))
|
||||
]]>
|
||||
|
||||
(define (toc-depth nd)
|
||||
(if (string=? (gi nd) (normalize "book"))
|
||||
3
|
||||
3))
|
||||
|
||||
</style-specification-body>
|
||||
</style-specification>
|
||||
|
||||
|
||||
@ -18,6 +18,9 @@
|
||||
<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"
|
||||
@ -56,36 +59,8 @@
|
||||
(create-link (list (list "HREF" "mailto:doc@FreeBSD.org"))
|
||||
(literal "doc@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 (string-append u "&" "manpath=FreeBSD+5.0-current")))))
|
||||
]]>
|
||||
|
||||
(define (toc-depth nd)
|
||||
(if (string=? (gi nd) (normalize "book"))
|
||||
3
|
||||
3))
|
||||
|
||||
</style-specification-body>
|
||||
</style-specification>
|
||||
|
||||
|
||||
@ -12,6 +12,9 @@
|
||||
<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"
|
||||
@ -55,37 +58,7 @@
|
||||
(create-link (list (list "HREF" "http://www.jp.FreeBSD.org/ml.html#doc-jp"))
|
||||
(literal "doc-jp@jp.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 (string-append u "&" "manpath=FreeBSD+5.0-current")))))
|
||||
]]>
|
||||
|
||||
(define (toc-depth nd)
|
||||
(if (string=? (gi nd) (normalize "book"))
|
||||
3
|
||||
3))
|
||||
|
||||
</style-specification-body>
|
||||
</style-specification>
|
||||
|
||||
|
||||
@ -6,6 +6,8 @@
|
||||
<!ENTITY % include.historic "IGNORE">
|
||||
<!ENTITY % no.include.historic "IGNORE">
|
||||
<!ENTITY freebsd.dsl PUBLIC "-//FreeBSD//DOCUMENT DocBook Stylesheet//EN" CDATA DSSSL>
|
||||
<!ENTITY % release.ent PUBLIC "-//FreeBSD//ENTITIES Release Specification//EN">
|
||||
%release.ent;
|
||||
]>
|
||||
|
||||
<style-sheet>
|
||||
@ -111,11 +113,35 @@
|
||||
(define %callout-graphics%
|
||||
;; Use graphics in callouts?
|
||||
#f)
|
||||
|
||||
<!-- Convert " ... " to `` ... '' in the HTML output. -->
|
||||
(element quote
|
||||
(make sequence
|
||||
(literal "``")
|
||||
(process-children)
|
||||
(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 "&release.man.url;?query="
|
||||
(data r) "&" "sektion=" (data m))))
|
||||
(case v
|
||||
(("xfree86") (string-append u "&" "manpath=XFree86+&release.manpath.xfree86;" ))
|
||||
(("netbsd") (string-append u "&" "manpath=NetBSD+&release.manpath.netbsd;"))
|
||||
(("ports") (string-append u "&" "manpath=FreeBSD+&release.manpath.freebsd-ports;"))
|
||||
(else (string-append u "&" "manpath=FreeBSD+&release.manpath.freebsd;")))))
|
||||
]]>
|
||||
|
||||
(define (toc-depth nd)
|
||||
(if (string=? (gi nd) (normalize "book"))
|
||||
3
|
||||
3))
|
||||
|
||||
</style-specification-body>
|
||||
</style-specification>
|
||||
|
||||
<external-specification id="docbook" document="freebsd.dsl">
|
||||
</style-sheet>
|
||||
|
||||
|
||||
@ -37,6 +37,13 @@
|
||||
<!ENTITY % release.type.snapshot "INCLUDE">
|
||||
<!ENTITY % release.type.release "IGNORE">
|
||||
|
||||
<!-- The manpaths for man page references -->
|
||||
<!ENTITY release.man.url "http://www.FreeBSD.org/cgi/man.cgi">
|
||||
<!ENTITY release.manpath.xfree86 "4.2.0">
|
||||
<!ENTITY release.manpath.netbsd "1.5">
|
||||
<!ENTITY release.manpath.freebsd-ports "Ports">
|
||||
<!ENTITY release.manpath.freebsd "5.0-current">
|
||||
|
||||
<!-- Text constants which probably don't need to be changed.-->
|
||||
|
||||
<!-- Name of our OS. This is almost certainly going to remain
|
||||
|
||||
Loading…
Reference in New Issue
Block a user