scribble/sigplan: add exclusive-license

original commit: c6bd9b23e0fd6849b880c33f5757b48658e5460e
This commit is contained in:
Matthew Flatt 2013-09-12 06:50:19 -06:00
parent 546e790ff4
commit 837249163c
5 changed files with 15 additions and 1 deletions

View File

@ -104,6 +104,7 @@ e-mail address with the author name.}
@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?] @defproc[(doi [content pre-content?] ...) block?]
@defproc[(exclusive-license) 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.}

View File

@ -27,6 +27,9 @@
[copyrightdata [copyrightdata
(->* () () #:rest (listof pre-content?) (->* () () #:rest (listof pre-content?)
block?)] block?)]
[exclusive-license
(->* () ()
block?)]
[doi [doi
(->* () () #:rest (listof pre-content?) (->* () () #:rest (listof pre-content?)
block?)] block?)]
@ -136,6 +139,13 @@
(make-style "Sdoi" sigplan-extras) (make-style "Sdoi" sigplan-extras)
(decode-content what)))) (decode-content what))))
(define (exclusive-license . what)
(make-paragraph
(make-style 'pretitle null)
(make-element
(make-style "SPexclusivelicense" sigplan-extras)
(decode-content what))))
;; ---------------------------------------- ;; ----------------------------------------
;; Categories, terms, and keywords: ;; Categories, terms, and keywords:

View File

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

View File

@ -12,6 +12,7 @@
\newcommand{\SCopyrightYear}[1]{} \newcommand{\SCopyrightYear}[1]{}
\newcommand{\SCopyrightData}[1]{} \newcommand{\SCopyrightData}[1]{}
\newcommand{\Sdoi}[1]{} \newcommand{\Sdoi}[1]{}
\newcommand{\SPexclusivelicense}[0]{}
\newcommand{\SCategory}[3]{} \newcommand{\SCategory}[3]{}
\newcommand{\SCategoryPlus}[4]{} \newcommand{\SCategoryPlus}[4]{}

View File

@ -30,6 +30,7 @@
\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{\Sdoi}[1]{\doi{#1}}
\renewcommand{\SPexclusivelicense}[0]{\exclusivelicense}
\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]}