os/doc
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Remove the comment about <FAQList>, that's been obsoleted by DocBook 3.1.

Browse source 
Default to labelling questions with "Q:" and answers with "A:" when
processing <qandaset>s.  In the HTML output, render questions in a larger,
bolder font than the answers.  Requested by several people on -doc.

Default to numbering sections. Requested by one person on -doc, who
seemed somewhat confused that I hadn't read his mind and done this three
months previously.
cvs: ----------------------------------------------------------------------
This commit is contained in:
Nik Clayton 1999-08-23 21:02:01 +00:00
parent e894e169bc
commit e1302f8644
Notes: svn2git 2020-12-08 03:00:23 +00:00 
svn path=/head/; revision=5430
1 changed files with 33 additions and 4 deletions

37
share/sgml/freebsd.dsl
View file

@ -57,7 +57,10 @@
]]>
<!-- Both sets of stylesheets .................................... -->
<!-- Both sets of stylesheets ..................................... -->
(define %section-autolabel%
#t)
(define %may-format-variablelist-as-table%
#f)
@ -121,9 +124,35 @@
(element maketarget ($mono-seq$))
(element makevar ($mono-seq$))
<!-- FAQList can wait. I've been drinking, and a brief glance at
/usr/local/share/sgml/docbook/dsssl/modular/html/dblist.dsl is
enough to bring me out in cold, Lisp induced sweats. . . -->
<!-- QAndASet ..................................................... -->
<!-- Default to labelling Q/A with Q: and A: -->
(define (qanda-defaultlabel)
(normalize "qanda"))
<!-- For the HTML version, display the questions in a bigger, bolder
font. -->
<![ %output.html [
(element question
(let* ((chlist (children (current-node)))
(firstch (node-list-first chlist))
(restch (node-list-rest chlist)))
(make element gi: "DIV"
attributes: (list (list "CLASS" (gi)))
(make element gi: "P"
(make element gi: "BIG"
(make element gi: "A"
attributes: (list
(list "NAME" (element-id)))
(empty-sosofo))
(make element gi: "B"
(literal (question-answer-label
(current-node)) " ")
(process-node-list (children firstch)))))
(process-node-list restch))))
]]>
</style-specification-body>
</style-specification>