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

scribble/sigplan: add `doi'

Browse Source 
original commit: 36203863d8d89ae81a91fddba1b41765e836aff5
This commit is contained in:
Matthew Flatt 2013-08-28 10:02:28 -06:00
parent c0556bb30f
commit 3f43a70496
5 changed files with 14 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
pkgs/scribble-pkgs/scribble-doc/scribblings/scribble/sigplan.scrbl
View File

@ -103,6 +103,7 @@ e-mail address with the author name.}
@defproc[(conferenceinfo [conference pre-content?] [location pre-content?]) block?] @defproc[(conferenceinfo [conference pre-content?] [location pre-content?]) block?]
@defproc[(copyrightyear [content pre-content?] ...) block?] @defproc[(copyrightyear [content pre-content?] ...) block?]
@defproc[(copyrightdata [content pre-content?] ...) block?] @defproc[(copyrightdata [content pre-content?] ...) block?]
@defproc[(doi [content pre-content?] ...) block?]
)]{ )]{
Declares information that is collected into the copyright region of the paper.} Declares information that is collected into the copyright region of the paper.}

10
pkgs/scribble-pkgs/scribble-lib/scribble/sigplan.rkt
View File

@ -27,6 +27,9 @@
[copyrightdata [copyrightdata
(->* () () #:rest (listof pre-content?) (->* () () #:rest (listof pre-content?)
block?)] block?)]
[doi
(->* () () #:rest (listof pre-content?)
block?)]
[category [category
(->* (pre-content? pre-content? pre-content?) (->* (pre-content? pre-content? pre-content?)
((or/c false/c pre-content?)) ((or/c false/c pre-content?))
@ -126,6 +129,13 @@
(make-style "SCopyrightData" sigplan-extras) (make-style "SCopyrightData" sigplan-extras)
(decode-content what)))) (decode-content what))))
(define (doi . what)
(make-paragraph
(make-style 'pretitle null)
(make-element
(make-style "Sdoi" sigplan-extras)
(decode-content what))))
;; ---------------------------------------- ;; ----------------------------------------
;; Categories, terms, and keywords: ;; Categories, terms, and keywords:

2
pkgs/scribble-pkgs/scribble-lib/scribble/sigplan/sigplan.css
View File

@ -1,7 +1,7 @@
/* Support for styles in scribble/sigplan */ /* Support for styles in scribble/sigplan */
.SAuthorPlace, .SAuthorEmail, .SAuthorPlace, .SAuthorEmail,
.SConferenceInfo, .SCopyrightYear, .SCopyrightData, .SConferenceInfo, .SCopyrightYear, .SCopyrightData, .Sdoi,
.SCategory, .SCategoryPlus, .STerms, .SKeywords { .SCategory, .SCategoryPlus, .STerms, .SKeywords {
display: none; display: none;
} }

1
pkgs/scribble-pkgs/scribble-lib/scribble/sigplan/sigplan.tex
View File

@ -11,6 +11,7 @@
\newcommand{\SConferenceInfo}[2]{} \newcommand{\SConferenceInfo}[2]{}
\newcommand{\SCopyrightYear}[1]{} \newcommand{\SCopyrightYear}[1]{}
\newcommand{\SCopyrightData}[1]{} \newcommand{\SCopyrightData}[1]{}
\newcommand{\Sdoi}[1]{}
\newcommand{\SCategory}[3]{} \newcommand{\SCategory}[3]{}
\newcommand{\SCategoryPlus}[4]{} \newcommand{\SCategoryPlus}[4]{}

2
pkgs/scribble-pkgs/scribble-lib/scribble/sigplan/style.tex
View File

@ -29,7 +29,7 @@
\renewcommand{\SConferenceInfo}[2]{\conferenceinfo{#1}{#2}} \renewcommand{\SConferenceInfo}[2]{\conferenceinfo{#1}{#2}}
\renewcommand{\SCopyrightYear}[1]{\copyrightyear{#1}} \renewcommand{\SCopyrightYear}[1]{\copyrightyear{#1}}
\renewcommand{\SCopyrightData}[1]{\copyrightdata{#1}} \renewcommand{\SCopyrightData}[1]{\copyrightdata{#1}}
\renewcommand{\Sdoi}[1]{\doi{#1}}
\renewcommand{\SCategory}[3]{\category{#1}{#2}{#3}} \renewcommand{\SCategory}[3]{\category{#1}{#2}{#3}}
\renewcommand{\SCategoryPlus}[4]{\category{#1}{#2}{#3}[#4]} \renewcommand{\SCategoryPlus}[4]{\category{#1}{#2}{#3}[#4]}