diff options
author | dd <dd@FreeBSD.org> | 2001-06-03 00:08:43 +0000 |
---|---|---|
committer | dd <dd@FreeBSD.org> | 2001-06-03 00:08:43 +0000 |
commit | 692d8f0637c2becc5462fe78ffef561d6ab26e33 (patch) | |
tree | 32a6e5cd4dbf35d504944e62ed83b0687a504148 /release | |
parent | 5f3c72f3c180254abe8a6223204b5155d221b254 (diff) | |
download | FreeBSD-src-692d8f0637c2becc5462fe78ffef561d6ab26e33.zip FreeBSD-src-692d8f0637c2becc5462fe78ffef561d6ab26e33.tar.gz |
Use the new create-link procedure instead of (make element gi: "A" ...).
Diffstat (limited to 'release')
-rw-r--r-- | release/doc/en_US.ISO8859-1/share/sgml/release.dsl | 23 | ||||
-rw-r--r-- | release/doc/en_US.ISO_8859-1/share/sgml/release.dsl | 23 |
2 files changed, 20 insertions, 26 deletions
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 c7f524e..2838743 100644 --- a/release/doc/en_US.ISO8859-1/share/sgml/release.dsl +++ b/release/doc/en_US.ISO8859-1/share/sgml/release.dsl @@ -17,21 +17,20 @@ attributes: (list (list "align" "center")) (make element gi: "small" (literal "This file, and other release-related documents, can be downloaded from ") - (make element gi: "a" - attributes: (list (list "href" (entity-text "release.url"))) + (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 "For questions about FreeBSD, read the ") - (make element gi: "a" - attributes: (list (list "href" "http://www.freebsd.org/docs.html")) + (create-link + (list (list "HREF" "http://www.FreeBSD.org/docs.html")) (literal "documentation")) (literal " before contacting <") - (make element gi: "a" - attributes: (list (list "href" "mailto:freebsd-questions@FreeBSD.org")) - (literal "freebsd-questions@FreeBSD.org")) + (create-link + (list (list "HREF" "mailto:questions@FreeBSD.org")) + (literal "questions@FreeBSD.org")) (literal ">.") (make element gi: "p" attributes: (list (list "align" "center")) @@ -40,17 +39,15 @@ (literal (entity-text "release.branch")) (literal " should subscribe to the ") (literal "<") - (make element gi: "a" - attributes: (list (list "href" "mailto:freebsd-current@FreeBSD.org")) - (literal "freebsd-current@FreeBSD.org")) + (create-link (list (list "HREF" "mailto:current@FreeBSD.org")) + (literal "current@FreeBSD.org")) (literal "> mailing list."))) (make element gi: "p" attributes: (list (list "align" "center")) (literal "For questions about this documentation, e-mail <") - (make element gi: "a" - attributes: (list (list "href" "mailto:freebsd-doc@FreeBSD.org")) - (literal "freebsd-doc@FreeBSD.org")) + (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) + (literal "doc@FreeBSD.org")) (literal ">.")))))) <!-- Convert " ... " to `` ... '' in the HTML output. --> diff --git a/release/doc/en_US.ISO_8859-1/share/sgml/release.dsl b/release/doc/en_US.ISO_8859-1/share/sgml/release.dsl index c7f524e..2838743 100644 --- a/release/doc/en_US.ISO_8859-1/share/sgml/release.dsl +++ b/release/doc/en_US.ISO_8859-1/share/sgml/release.dsl @@ -17,21 +17,20 @@ attributes: (list (list "align" "center")) (make element gi: "small" (literal "This file, and other release-related documents, can be downloaded from ") - (make element gi: "a" - attributes: (list (list "href" (entity-text "release.url"))) + (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 "For questions about FreeBSD, read the ") - (make element gi: "a" - attributes: (list (list "href" "http://www.freebsd.org/docs.html")) + (create-link + (list (list "HREF" "http://www.FreeBSD.org/docs.html")) (literal "documentation")) (literal " before contacting <") - (make element gi: "a" - attributes: (list (list "href" "mailto:freebsd-questions@FreeBSD.org")) - (literal "freebsd-questions@FreeBSD.org")) + (create-link + (list (list "HREF" "mailto:questions@FreeBSD.org")) + (literal "questions@FreeBSD.org")) (literal ">.") (make element gi: "p" attributes: (list (list "align" "center")) @@ -40,17 +39,15 @@ (literal (entity-text "release.branch")) (literal " should subscribe to the ") (literal "<") - (make element gi: "a" - attributes: (list (list "href" "mailto:freebsd-current@FreeBSD.org")) - (literal "freebsd-current@FreeBSD.org")) + (create-link (list (list "HREF" "mailto:current@FreeBSD.org")) + (literal "current@FreeBSD.org")) (literal "> mailing list."))) (make element gi: "p" attributes: (list (list "align" "center")) (literal "For questions about this documentation, e-mail <") - (make element gi: "a" - attributes: (list (list "href" "mailto:freebsd-doc@FreeBSD.org")) - (literal "freebsd-doc@FreeBSD.org")) + (create-link (list (list "HREF" "mailto:doc@FreeBSD.org")) + (literal "doc@FreeBSD.org")) (literal ">.")))))) <!-- Convert " ... " to `` ... '' in the HTML output. --> |