suzanne.soy/scribble-enhanced
1
0
Fork 0
Code Issues 1 Pull Requests 1 Actions Packages Projects Releases Wiki Activity

fix reference hyphen and some abbreviations

Browse Source 
original commit: 8f23d9dc1a281433982dd3a27cee263983911c62
This commit is contained in:
Matthew Flatt 2011-01-07 07:57:36 -07:00
parent 4faeb1744e
commit acd72493f3
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -52,7 +52,7 @@
(provide/contract (provide/contract
[PLaneT element?] [PLaneT element?]
[hash-lang (-> element?)] [hash-lang (-> element?)]
[etc string?] [etc element?]
[inset-flow (() () #:rest (listof pre-content?) . ->* . any/c)] ; XXX no docs and bad return contract [inset-flow (() () #:rest (listof pre-content?) . ->* . any/c)] ; XXX no docs and bad return contract
[litchar (() () #:rest (listof string?) . ->* . element?)] [litchar (() () #:rest (listof string?) . ->* . element?)]
[t (() () #:rest (listof pre-content?) . ->* . paragraph?)] [t (() () #:rest (listof pre-content?) . ->* . paragraph?)]
@ -61,7 +61,7 @@
(define PLaneT (make-element "planetName" '("PLaneT"))) (define PLaneT (make-element "planetName" '("PLaneT")))
(define etc "etc.") ; so we can fix the latex space, one day (define etc (make-element #f (list "etc" ._)))
(define (litchar . strs) (define (litchar . strs)
(let ([s (string-append* (map (lambda (s) (regexp-replace* "\n" s " ")) (let ([s (string-append* (map (lambda (s) (regexp-replace* "\n" s " "))

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

@ -1233,6 +1233,9 @@ Returns @racket[#t] if @racket[v] is a bibliography entry created by
@defproc[(t [pre-content pre-content?] ...) paragraph?]{Wraps the @defproc[(t [pre-content pre-content?] ...) paragraph?]{Wraps the
@tech{decode}d @racket[pre-content] as a paragraph.} @tech{decode}d @racket[pre-content] as a paragraph.}
@defthing[etc element?]{Like @racket["etc."], but with an
abbreviation-ending period for use in the middle of a sentence.}
@defthing[PLaneT element?]{@racket["PLaneT"] (to help make sure you get @defthing[PLaneT element?]{@racket["PLaneT"] (to help make sure you get
the letters in the right case).} the letters in the right case).}