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

adjust 'authors' from scriblib/autobib so that it

Browse Source 
has a contract (which I'm inferring from the way
it is implemented so I might be getting it wrong)

related to PR 12966
This commit is contained in:
Robby Findler 2012-08-14 21:33:04 -05:00
parent 19ff5722d5
commit f03274c8b7
2 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
collects/scriblib/autobib.rkt
View File

@ -10,14 +10,19 @@
(for-syntax syntax/parse (for-syntax syntax/parse
racket/base) racket/base)
scheme/string scheme/string
setup/main-collects) setup/main-collects
racket/contract)
(provide define-cite (provide define-cite
author+date-style number-style author+date-style number-style
make-bib in-bib (rename-out [auto-bib? bib?]) make-bib in-bib (rename-out [auto-bib? bib?])
proceedings-location journal-location book-location proceedings-location journal-location book-location
techrpt-location dissertation-location techrpt-location dissertation-location
author-name org-author-name authors other-authors editor) author-name org-author-name
(contract-out
[authors (->* (content?) #:rest (listof content?) element?)])
other-authors
editor)
(define autobib-style-extras (define autobib-style-extras
(let ([abs (lambda (s) (let ([abs (lambda (s)

5
collects/scriblib/scribblings/autobib.scrbl
View File

@ -193,10 +193,11 @@ describing an author's name, especially where the last name is not
merely a sequence of ASCII alphabet letters or where the name has a merely a sequence of ASCII alphabet letters or where the name has a
suffix (such as ``Jr.'').} suffix (such as ``Jr.'').}
@defproc[(authors [name any/c] ...) element?]{ @defproc[(authors [name content?] [names content?] ...) element?]{
Combines multiple author elements into one, so that it is rendered and Combines multiple author elements into one, so that it is rendered and
alphabetized appropriately. If a @racket[name] is a string, it is alphabetized appropriately. Any of @racket[name] or @racket[names]
that are strings are
parsed in the same way as by @racket[make-bib].} parsed in the same way as by @racket[make-bib].}
@defproc[(org-author-name [name any/c]) element?]{ @defproc[(org-author-name [name any/c]) element?]{