suzanne.soy/hyper-literate
1
0
Fork 0
Code Issues 4 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

add #:underlined? argument to elemref

Browse Source 
svn: r13669

original commit: 7b57156ac2a57a90821ca5c955bc811a35185419
This commit is contained in:
Matthew Flatt 2009-02-16 16:42:22 +00:00
parent ff5f3c508a
commit 9f64663db4
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/scribble/private/manual-style.ss
View File

@ -172,8 +172,8 @@
(define (elemtag t . body)
(make-target-element #f (decode-content body) `(elem ,t)))
(define (elemref t . body)
(make-link-element #f (decode-content body) `(elem ,t)))
(define (elemref #:underline? [u? #t] t . body)
(make-link-element (if u? #f "plainlink") (decode-content body) `(elem ,t)))
(define (doc-prefix doc s)
(if doc (list (module-path-prefix->string doc) s) s))

3
collects/scribblings/scribble/manual.scrbl
View File

@ -899,7 +899,8 @@ The tag @scheme[t] refers to the content form of
@scheme[pre-content].}
@defproc[(elemref [t tag?] [pre-content any/c] ...) element?]{
@defproc[(elemref [t tag?] [pre-content any/c] ...
[#:underline? underline? any/c #t]) element?]{
The @tech{decode}d @scheme[pre-content] is hyperlinked to @scheme[t],
which is normally defined using @scheme[elemtag].}