blob: 0f497dd22d05d42ea8cfa1929fe68a52a6f0eb48 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
|
<!-- $FreeBSD$ -->
<!-- Original revision: 1.4 -->
<!DOCTYPE style-sheet PUBLIC "-//James Clark//DTD DSSSL Style Sheet//EN" [
<!ENTITY release.dsl PUBLIC "-//FreeBSD//DOCUMENT Release Notes DocBook Language Neutral Stylesheet//EN" CDATA DSSSL>
<!ENTITY % output.html "IGNORE">
<!ENTITY % output.print "IGNORE">
]>
<style-sheet>
<style-specification use="docbook">
<style-specification-body>
<![ %output.html; [
(define ($email-footer$)
(make sequence
(make element gi: "p"
attributes: (list (list "align" "center"))
(make element gi: "small"
(literal "このファイルの他, リリース関連の文書は ")
(create-link (list (list "HREF" (entity-text "release.url")))
(literal (entity-text "release.url")))
(literal " からダウンロードできます.")))
(make element gi: "p"
attributes: (list (list "align" "center"))
(make element gi: "small"
(literal "FreeBSD に関するお問い合わせは, <")
(create-link
(list (list "HREF" "mailto:questions@FreeBSD.org"))
(literal "questions@FreeBSD.org"))
(literal "> へ質問を投稿する前に")
(create-link
(list (list "HREF" "http://www.FreeBSD.org/docs.html"))
(literal "解説文書"))
(literal "をお読みください.")
(make element gi: "p"
attributes: (list (list "align" "center"))
(make element gi: "small"
(literal "FreeBSD ")
(literal (entity-text "release.branch"))
(literal " をお使いの方は, ぜひ ")
(literal "<")
(create-link (list (list "HREF" "mailto:current@FreeBSD.org"))
(literal "current@FreeBSD.org"))
(literal "> メーリングリストに参加ください.")))
(make element gi: "p"
attributes: (list (list "align" "center"))
(literal "この文書の原文に関するお問い合わせは <")
(create-link (list (list "HREF" "mailto:doc@FreeBSD.org"))
(literal "doc@FreeBSD.org"))
(literal "> まで, ")
(make empty-element gi: "br")
(literal "日本語訳に関するお問い合わせは, <")
(create-link (list (list "HREF" "mailto:doc-jp@jp.FreeBSD.org"))
(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"))))
(string-append "http://www.FreeBSD.org/cgi/man.cgi?query="
(data r) "&" "sektion=" (data m)
"&" "manpath=FreeBSD+5.0-current")))
]]>
(define (toc-depth nd)
(if (string=? (gi nd) (normalize "book"))
3
3))
</style-specification-body>
</style-specification>
<external-specification id="docbook" document="release.dsl">
</style-sheet>
|
