system/freebsd-src
system/freebsd-src
1
0
Fork 0
mirror of https://github.com/freebsd/freebsd-src synced 2024-10-05 08:00:30 +00:00
Code Issues Packages Projects Releases Wiki Activity

Move ($create-refentry-xref-link$) to the language-neutral place

Browse source 
and add entities &release.manpath.*; for man.cgi's manpath=XXX.

Approved by:	re (bmah)
This commit is contained in:
Hiroki Sato 2003-05-23 10:30:27 +00:00
parent b32a99e5f4
commit 384e8e93c1
Notes: svn2git 2020-12-20 02:59:44 +00:00 
svn path=/head/; revision=115262
6 changed files with 46 additions and 115 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

31
release/doc/de_DE.ISO8859-1/share/sgml/release.dsl
View file

@ -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>

31
release/doc/en_US.ISO8859-1/share/sgml/release.dsl
View file

@ -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>

31
release/doc/fr_FR.ISO8859-1/share/sgml/release.dsl
View file

@ -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>

33
release/doc/ja_JP.eucJP/share/sgml/release.dsl
View file

@ -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>

28
release/doc/share/sgml/release.dsl
View file

@ -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>

7
release/doc/share/sgml/release.ent
View file

@ -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