summaryrefslogtreecommitdiff
path: root/Master/texmf-dist
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2011-09-20 23:09:57 +0000
committerKarl Berry <karl@freefriends.org>2011-09-20 23:09:57 +0000
commitbd87be362879f350b25c3ea85b08ba1060a2eeb6 (patch)
tree2218bcb55e2f23e5fd07353afc350d62bd8518b4 /Master/texmf-dist
parent5af36a3782004a781c0854e0f83ca435ce2140c6 (diff)
chscite 2.9 (20sep11)
git-svn-id: svn://tug.org/texlive/trunk@24037 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist')
-rw-r--r--Master/texmf-dist/bibtex/bst/chscite/chscite.bst1035
-rw-r--r--Master/texmf-dist/doc/latex/chscite/README2
-rw-r--r--Master/texmf-dist/doc/latex/chscite/chscite.pdfbin185812 -> 185768 bytes
-rw-r--r--Master/texmf-dist/source/latex/chscite/chscite.dtx6
-rw-r--r--Master/texmf-dist/tex/latex/chscite/chscite.sty2
5 files changed, 1040 insertions, 5 deletions
diff --git a/Master/texmf-dist/bibtex/bst/chscite/chscite.bst b/Master/texmf-dist/bibtex/bst/chscite/chscite.bst
index a00a6426830..407ae430262 100644
--- a/Master/texmf-dist/bibtex/bst/chscite/chscite.bst
+++ b/Master/texmf-dist/bibtex/bst/chscite/chscite.bst
@@ -20,3 +20,1038 @@
%% and version 1.2 or later is part of all distributions of LaTeX version
%% 1999/12/01 or later.
%%
+ENTRY
+ {
+ address
+ author
+ booktitle
+ chapter
+ edition
+ editor
+ howpublished
+ institution
+ journal
+ key
+ month
+ note
+ number
+ organization
+ pages
+ publisher
+ school
+ series
+ title
+ type
+ URL
+ volume
+ year
+ }
+ { field.used }
+ { extra.label sort.label list.year }
+
+INTEGERS { output.state before.all mid.sentence after.sentence after.block }
+
+FUNCTION {init.state.consts}
+{
+ #0 'before.all :=
+ #1 'mid.sentence :=
+ #2 'after.sentence :=
+ #3 'after.block :=
+}
+
+STRINGS { s t f }
+
+FUNCTION {item.check}
+{
+ 't :=
+ empty$
+ { "empty " t * " in " * cite$ * warning$ }
+ { skip$ }
+ if$
+}
+
+FUNCTION {new.block}
+{
+ output.state before.all =
+ 'skip$
+ { after.block 'output.state := }
+ if$
+}
+
+FUNCTION {lastint}
+{
+ #-1 #1 substring$ chr.to.int$ "0" chr.to.int$ -
+}
+
+FUNCTION {format.number.th}
+{
+ duplicate$ duplicate$
+ #1 =
+ { pop$ pop$ "\chsWst{}" }
+ {
+ #2 =
+ { pop$ "\chsWnd{}" }
+ {
+ #3 =
+ { "\chsWrd{}" }
+ { "\chsWth{}" }
+ if$
+ }
+ if$
+ }
+ if$
+}
+
+FUNCTION {not}
+{
+ { #0 }
+ { #1 }
+ if$
+}
+
+FUNCTION {and}
+{
+ 'skip$
+ { pop$ #0 }
+ if$
+}
+
+FUNCTION {or}
+{
+ { pop$ #1 }
+ 'skip$
+ if$
+}
+
+FUNCTION {field.or.null}
+{
+ duplicate$ empty$
+ { pop$ "" }
+ 'skip$
+ if$
+}
+
+FUNCTION {emphasize}
+{
+ duplicate$ empty$
+ { pop$ "" }
+ { "\emph{" swap$ * "}" * }
+ if$
+}
+
+FUNCTION {write.url}
+{
+ URL empty$
+ 'skip$
+ { " \chsurl{" URL * "}" add.period$ * write$ newline$ }
+ if$
+}
+
+FUNCTION {fin.entry}
+{
+ add.period$
+ write$
+ write.url
+ newline$
+}
+
+INTEGERS { nameptr namesleft numnames }
+
+FUNCTION {format.names}
+{
+ 's :=
+ 'f :=
+ #1 'nameptr :=
+ s num.names$ 'numnames :=
+ numnames 'namesleft :=
+ #3 numnames >
+ {
+ { namesleft #0 > }
+ {
+ s nameptr f format.name$ 't :=
+ nameptr #1 >
+ {
+ namesleft #1 >
+ { ", " * t * }
+ {
+ t "others" =
+ { " et~al." * }
+ { " \chsWand{}\ " * t * }
+ if$
+ }
+ if$
+ }
+ 't
+ if$
+ nameptr #1 + 'nameptr :=
+ namesleft #1 - 'namesleft :=
+ }
+ while$
+ }
+ { s nameptr f format.name$ " et~al." * }
+ if$
+}
+
+FUNCTION {format.authors}
+{
+ author empty$
+ { "" }
+ { "{vv~}{ll}{, jj}{, f.}" author format.names }
+ if$
+}
+
+FUNCTION {n.dashify}
+{
+ 't :=
+ ""
+ { t empty$ not }
+ {
+ t #1 #1 substring$ "-" =
+ {
+ t #1 #2 substring$ "--" = not
+ {
+ "--" *
+ t #2 global.max$ substring$ 't :=
+ }
+ {
+ { t #1 #1 substring$ "-" = }
+ {
+ "-" *
+ t #2 global.max$ substring$ 't :=
+ }
+ while$
+ }
+ if$
+ }
+ {
+ t #1 #1 substring$ *
+ t #2 global.max$ substring$ 't :=
+ }
+ if$
+ }
+ while$
+}
+
+FUNCTION {format.btitle}
+{
+ title "." * emphasize
+}
+
+FUNCTION {tie.or.space.connect}
+{
+ duplicate$ text.length$ #3 <
+ { "~" }
+ { " " }
+ if$
+ swap$ * *
+}
+
+FUNCTION {either.or.check}
+{
+ empty$
+ 'pop$
+ { "can't use both " swap$ * " fields in " * cite$ * warning$ }
+ if$
+}
+
+FUNCTION {format.editors}
+{
+ editor empty$
+ { "" }
+ { "\chsWeditor{}" "{vv~}{ll}{, jj}{, f.}" editor format.names tie.or.space.connect }
+ if$
+}
+
+FUNCTION {format.book.editors}
+{
+ editor empty$
+ { "" }
+ { "\chsWeditor{}" "{vv~}{ll}{, jj}{, f.}" editor format.names tie.or.space.connect }
+ if$
+}
+
+FUNCTION {format.edition}
+{
+ edition edition lastint format.number.th *
+}
+
+INTEGERS { multiresult }
+
+FUNCTION {multi.page.check}
+{
+ 't :=
+ #0 'multiresult :=
+ {
+ multiresult not
+ t empty$ not
+ and
+ }
+ {
+ t #1 #1 substring$
+ duplicate$ "-" =
+ swap$ duplicate$ "," =
+ swap$ "+" =
+ or or
+ { #1 'multiresult := }
+ { t #2 global.max$ substring$ 't := }
+ if$
+ }
+ while$
+ multiresult
+}
+
+FUNCTION {format.pages}
+{
+ pages empty$
+ { "" }
+ {
+ ","
+ pages multi.page.check
+ { "\chsPages{}" pages n.dashify tie.or.space.connect }
+ { "\chsPage{}" pages tie.or.space.connect }
+ if$
+ tie.or.space.connect
+ }
+ if$
+}
+
+INTEGERS { len }
+
+FUNCTION {chop.word}
+{
+ 's :=
+ 'len :=
+ s #1 len substring$ =
+ { s len #1 + global.max$ substring$ }
+ 's
+ if$
+}
+
+INTEGERS { ind tsslen }
+
+STRINGS { tss ret rss istr }
+
+FUNCTION {replace.substring}
+{
+ 'rss :=
+ 'tss :=
+ 'istr :=
+ "" 'ret :=
+ tss text.length$ 'tsslen :=
+ #1 'ind :=
+ { istr ind tsslen substring$ "" = not }
+ {
+ istr ind tsslen substring$ tss =
+ {
+ ret rss * 'ret :=
+ ind tsslen + 'ind :=
+ }
+ {
+ ret istr ind #1 substring$ * 'ret :=
+ ind #1 + 'ind :=
+ }
+ if$
+ }
+ while$
+ ret
+}
+
+FUNCTION {format.lab.names.abbr}
+{
+ 's :=
+ s num.names$ 'numnames :=
+ numnames #1 >
+ {
+ numnames #3 >
+ { s #1 "{vv~}{ll}" format.name$ " et~al." * }
+ {
+ s #2 "{ff }{vv }{ll}{ jj}" format.name$ "others" =
+ { s #1 "{vv~}{ll}" format.name$ " et~al." * }
+ {
+ s #1 "{vv~}{ll}" format.name$ " \chsWand{}\ " *
+ s #2 "{vv~}{ll}" format.name$ *
+ }
+ if$
+ }
+ if$
+ }
+ { s #1 "{vv~}{ll}" format.name$ }
+ if$
+}
+
+FUNCTION {format.lab.names.full}
+{
+ 's :=
+ #1 'nameptr :=
+ s num.names$ 'numnames :=
+ numnames 'namesleft :=
+ { namesleft #0 > }
+ {
+ s nameptr "{vv~}{ll}" format.name$ 't :=
+ nameptr #1 >
+ {
+ namesleft #1 >
+ { ", " * t * }
+ {
+ t "others" =
+ { " et~al." * }
+ { " \chsWand{}\ " * t * }
+ if$
+ }
+ if$
+ }
+ 't
+ if$
+ nameptr #1 + 'nameptr :=
+ namesleft #1 - 'namesleft :=
+ }
+ while$
+}
+
+INTEGERS { author.field editor.field organization.field title.field key.field }
+
+FUNCTION {init.field.constants}
+{
+ #0 'author.field :=
+ #1 'editor.field :=
+ #2 'organization.field :=
+ #3 'title.field :=
+ #4 'key.field :=
+}
+
+FUNCTION {make.list.label}
+{
+ author.field field.used =
+ { format.authors }
+ {
+ editor.field field.used =
+ { format.editors }
+ {
+ organization.field field.used =
+ { "The " #4 organization chop.word #3 text.prefix$ }
+ {
+ title.field field.used =
+ { format.btitle }
+ {
+ key.field field.used =
+ { key #3 text.prefix$ }
+ { "Internal error :001 on " cite$ * " label" * warning$ }
+ if$
+ }
+ if$
+ }
+ if$
+ }
+ if$
+ }
+ if$
+}
+
+FUNCTION {make.full.label}
+{
+ author.field field.used =
+ { author format.lab.names.full }
+ {
+ editor.field field.used =
+ { editor format.lab.names.full }
+ {
+ organization.field field.used =
+ { "The " #4 organization chop.word #3 text.prefix$ }
+ {
+ title.field field.used =
+ { format.btitle }
+ {
+ key.field field.used =
+ { key #3 text.prefix$ }
+ { "Internal error :001 on " cite$ * " label" * warning$ }
+ if$
+ }
+ if$
+ }
+ if$
+ }
+ if$
+ }
+ if$
+}
+
+FUNCTION {make.abbr.label}
+{
+author.field field.used =
+{ author format.lab.names.abbr }
+{
+ editor.field field.used =
+ { editor format.lab.names.abbr }
+ {
+ organization.field field.used =
+ { "The " #4 organization chop.word #3 text.prefix$ }
+ {
+ title.field field.used =
+ { format.btitle }
+ {
+ key.field field.used =
+ { key #3 text.prefix$ }
+ { "Internal error :001 on " cite$ * " label" * warning$ }
+ if$
+ }
+ if$
+ }
+ if$
+ }
+ if$
+}
+if$
+}
+
+FUNCTION {output.bibitem}
+{
+ newline$
+ "\chsitem{" write$
+ make.abbr.label write$
+ "}{" write$
+ list.year write$
+ "}{" write$
+ cite$ write$
+ "}" write$
+ newline$
+ ""
+ before.all 'output.state :=
+}
+
+FUNCTION {journal.or.series}
+{
+ journal missing$
+{ series }
+{ journal }
+if$
+}
+
+FUNCTION {publisher.or.school}
+{
+ publisher missing$
+{ school }
+{ publisher }
+if$
+}
+
+%% STYLES
+FUNCTION {article}
+{ output.bibitem
+ make.list.label "(" tie.or.space.connect list.year * ")" *
+ author "author" item.check
+ title missing$
+ 'skip$
+ { title tie.or.space.connect }
+ if$
+type$ "inproceedings" =
+type$ "conference" =
+or not
+month missing$
+or
+'skip$
+{ ";" month year tie.or.space.connect tie.or.space.connect }
+if$
+journal missing$
+'skip$
+{ add.period$ journal.or.series emphasize tie.or.space.connect
+ volume missing$
+{ cite$ " has journal/series with no volume!" * warning$ }
+{ "," "\chsVolume{}" tie.or.space.connect volume tie.or.space.connect * }
+if$
+ number missing$
+'skip$
+{ "," "\chsNumero{}" number tie.or.space.connect tie.or.space.connect * }
+if$
+}
+if$
+pages missing$
+'skip$
+{ format.pages * }
+if$
+add.period$ *
+
+ fin.entry
+}
+
+FUNCTION {book}
+{ output.bibitem
+ make.list.label "(" tie.or.space.connect list.year * ")" *
+ author "author" item.check
+chapter missing$
+'skip$
+{ chapter add.period$ "\chsWin{}" tie.or.space.connect tie.or.space.connect }
+if$
+ title missing$
+ 'skip$
+ { title emphasize tie.or.space.connect }
+ if$
+editor missing$
+'skip$
+{ "," format.book.editors tie.or.space.connect }
+if$
+pages missing$
+journal missing$
+not or
+'skip$
+{ format.pages * }
+if$
+add.period$
+ edition missing$
+'skip$
+{ edition empty$
+'skip$
+{ format.edition "\chsEdition{}" add.period$ tie.or.space.connect tie.or.space.connect }
+if$
+}
+if$
+URL missing$
+ 'skip$
+ { "[\chsWelectronic]" tie.or.space.connect }
+if$
+ publisher missing$
+school missing$
+and
+'skip$
+{ address missing$
+{ cite$ " has publisher with no address!" * warning$ }
+{ address ":" * publisher.or.school tie.or.space.connect add.period$ tie.or.space.connect }
+if$
+}
+if$
+series missing$
+journal missing$
+and
+'skip$
+{ volume missing$
+{ cite$ " has journal/series with no volume!" * warning$ }
+{ "(" journal.or.series ":" * * volume tie.or.space.connect
+series missing$
+'skip$
+{ format.pages * }
+if$
+")" add.period$ * tie.or.space.connect * }
+if$
+}
+if$
+
+type$ "mastersthesis" =
+type$ "phdthesis" =
+or
+'skip$
+ { write$ fin.entry }
+if$
+}
+
+FUNCTION {booklet} { book }
+
+FUNCTION {inbook} { book }
+
+FUNCTION {incollection} { book }
+
+FUNCTION {inproceedings}
+{ output.bibitem
+ make.list.label "(" tie.or.space.connect list.year * ")" *
+ author "author" item.check
+booktitle missing$
+{ title emphasize tie.or.space.connect }
+{ title add.period$ "\chsWin{}" tie.or.space.connect booktitle emphasize tie.or.space.connect tie.or.space.connect }
+if$
+month missing$
+'skip$
+{ booktitle missing$
+{ add.period$ }
+{ ";" * }
+if$
+month "~" year * * tie.or.space.connect
+}
+if$
+address missing$
+'skip$
+{ "," address tie.or.space.connect add.period$ * }
+if$
+pages missing$
+'skip$
+{ format.pages add.period$ tie.or.space.connect }
+if$
+write$
+
+ fin.entry
+}
+
+FUNCTION {conference} { inproceedings }
+
+FUNCTION {manual}
+{ cite$ ": @manual cite style not implemented!" * warning$ }
+
+FUNCTION {mastersthesis}
+{ book
+"(\chsWmscthesis{}" tie.or.space.connect
+note missing$
+'skip$
+{ "\chsWinstitution{}" note tie.or.space.connect tie.or.space.connect }
+if$
+")" add.period$ * write$
+fin.entry
+}
+
+FUNCTION {phdthesis}
+{ book
+"(\chsWphdthesis{}" tie.or.space.connect
+note missing$
+'skip$
+{ "\chsWinstitution{}" note tie.or.space.connect tie.or.space.connect }
+if$
+")" add.period$ * write$
+fin.entry
+}
+
+FUNCTION {proceedings} { inproceedings }
+
+FUNCTION {unpublished}
+{ output.bibitem
+ make.list.label "(" tie.or.space.connect list.year * ")" *
+ author "author" item.check
+chapter missing$
+'skip$
+{ chapter add.period$ "\chsWin{}" tie.or.space.connect tie.or.space.connect tie.or.space.connect }
+if$
+ title missing$
+ 'skip$
+ { title emphasize tie.or.space.connect }
+ if$
+editor missing$
+'skip$
+{ "," format.book.editors tie.or.space.connect * }
+if$
+pages missing$
+journal missing$
+not or
+'skip$
+{ format.pages * }
+if$
+add.period$
+URL missing$
+ { "\chsWprinting{}" tie.or.space.connect add.period$ }
+ { "[\chsWelectronic]" tie.or.space.connect }
+if$
+ publisher missing$
+'skip$
+{ address missing$
+{ cite$ " has publisher with no address!" * warning$ }
+{ address ":" * publisher.or.school tie.or.space.connect add.period$ tie.or.space.connect }
+if$
+}
+if$
+write$
+
+ fin.entry
+}
+
+FUNCTION {misc}
+{ cite$ ": @misc cite style not implemented!" * warning$ }
+
+FUNCTION {techreport}
+{ cite$ ": @techreport cite style not implemented!" * warning$ }
+
+FUNCTION {default.type} { misc }
+
+MACRO {jan} {"\chsWjanuary{}"}
+MACRO {feb} {"\chsWfebruary{}"}
+MACRO {mar} {"\chsWmarch{}"}
+MACRO {apr} {"\chsWapril{}"}
+MACRO {may} {"\chsWmay{}"}
+MACRO {jun} {"\chsWjune{}"}
+MACRO {jul} {"\chsWjuly{}"}
+MACRO {aug} {"\chsWaugust{}"}
+MACRO {sep} {"\chsWseptember{}"}
+MACRO {oct} {"\chsWoctober{}"}
+MACRO {nov} {"\chsWnovember{}"}
+MACRO {dec} {"\chsWdecember{}"}
+
+MACRO {acmcs} {"ACM Computing Surveys"}
+MACRO {acta} {"Acta Informatica"}
+MACRO {cacm} {"Communications of the ACM"}
+MACRO {ibmjrd} {"IBM Journal of Research and Development"}
+MACRO {ibmsj} {"IBM Systems Journal"}
+MACRO {ieeese} {"IEEE Transactions on Software Engineering"}
+MACRO {ieeetc} {"IEEE Transactions on Computers"}
+MACRO {ieeetcad} {"IEEE Transactions on Computer-Aided Design of Integrated Circuits"}
+MACRO {ipl} {"Information Processing Letters"}
+MACRO {jacm} {"Journal of the ACM"}
+MACRO {jcss} {"Journal of Computer and System Sciences"}
+MACRO {scp} {"Science of Computer Programming"}
+MACRO {sicomp} {"SIAM Journal on Computing"}
+MACRO {tocs} {"ACM Transactions on Computer Systems"}
+MACRO {tods} {"ACM Transactions on Database Systems"}
+MACRO {tog} {"ACM Transactions on Graphics"}
+MACRO {toms} {"ACM Transactions on Mathematical Software"}
+MACRO {toois} {"ACM Transactions on Office Information Systems"}
+MACRO {toplas} {"ACM Transactions on Programming Languages and Systems"}
+MACRO {tcs} {"Theoretical Computer Science"}
+
+READ
+
+EXECUTE {init.field.constants}
+
+FUNCTION {sortify}
+{
+ purify$
+ "l" change.case$
+}
+
+FUNCTION {sortify.names}
+{
+ " \chsWand{}\ " " " replace.substring
+ " et~al." " zzz" replace.substring
+ sortify
+}
+
+FUNCTION {author.key.label}
+{
+ author empty$
+ {
+ key empty$
+ { title.field 'field.used := }
+ { key.field 'field.used := }
+ if$
+ }
+ { author.field 'field.used := }
+ if$
+}
+
+FUNCTION {author.editor.key.label}
+{
+ author empty$
+ {
+ editor empty$
+ {
+ key empty$
+ { title.field 'field.used := }
+ { key.field 'field.used := }
+ if$
+ }
+ { editor.field 'field.used := }
+ if$
+ }
+ { author.field 'field.used := }
+ if$
+}
+
+FUNCTION {author.key.organization.label}
+{
+ author empty$
+ {
+ key empty$
+ {
+ organization empty$
+ { title.field 'field.used := }
+ { organization.field 'field.used := }
+ if$
+ }
+ { key.field 'field.used := }
+ if$
+ }
+ { author.field 'field.used := }
+ if$
+}
+
+FUNCTION {editor.key.organization.label}
+{
+ editor empty$
+ {
+ key empty$
+ {
+ organization empty$
+ { title.field 'field.used := }
+ { organization.field 'field.used := }
+ if$
+ }
+ { key.field 'field.used := }
+ if$
+ }
+ { editor.field 'field.used := }
+ if$
+}
+
+FUNCTION {sort.format.title}
+{
+ 't :=
+ "A " #2
+ "An " #3
+ "The " #4 t chop.word
+ chop.word
+ chop.word
+ sortify
+ #1 global.max$ substring$
+}
+
+FUNCTION {calc.label}
+{
+ make.abbr.label
+ title.field field.used =
+ { sort.format.title }
+ { sortify.names }
+ if$
+ year field.or.null purify$ #-1 #4 substring$ sortify *
+ 'sort.label :=
+}
+
+FUNCTION {preliminaries}
+{
+ type$ "book" =
+ type$ "inbook" =
+ or
+ 'author.editor.key.label
+ {
+ type$ "proceedings" =
+ 'editor.key.organization.label
+ {
+ type$ "manual" =
+ 'author.key.organization.label
+ 'author.key.label
+ if$
+ }
+ if$
+ }
+ if$
+}
+
+FUNCTION {first.presort}
+{
+ calc.label
+ sort.label
+ title.field field.used =
+ { skip$ }
+ { " " * make.list.label sortify.names * " " * title field.or.null sort.format.title * }
+ if$
+ #1 entry.max$ substring$
+ 'sort.key$ :=
+}
+
+ITERATE {preliminaries}
+
+ITERATE {first.presort}
+
+SORT
+
+STRINGS { last.sort.label next.extra last.full.label }
+
+INTEGERS { last.extra.num }
+
+FUNCTION {initialize.confusion}
+{
+ #0 int.to.chr$ 'last.sort.label :=
+ #0 int.to.chr$ 'last.full.label :=
+}
+
+FUNCTION {confusion.pass}
+{
+ last.sort.label sort.label =
+ 'skip$
+ {
+ sort.label 'last.sort.label :=
+ make.full.label sortify.names 'last.full.label :=
+ }
+ if$
+}
+
+EXECUTE {initialize.confusion}
+
+ITERATE {confusion.pass}
+
+EXECUTE {initialize.confusion}
+
+REVERSE {confusion.pass}
+
+FUNCTION {initialize.last.extra.num}
+{
+ #0 int.to.chr$ 'last.sort.label :=
+ "" 'next.extra :=
+ #0 'last.extra.num :=
+}
+
+FUNCTION {forward.pass}
+{
+ last.sort.label sort.label =
+ {
+ last.extra.num #1 + 'last.extra.num :=
+ last.extra.num int.to.chr$ 'extra.label :=
+ }
+ {
+ "a" chr.to.int$ 'last.extra.num :=
+ "" 'extra.label :=
+ sort.label 'last.sort.label :=
+ }
+ if$
+}
+
+FUNCTION {reverse.pass}
+{
+ next.extra "b" =
+ { "a" 'extra.label := }
+ 'skip$
+ if$
+ year empty$
+ { "n.d." extra.label * 'list.year := }
+ { year extra.label * 'list.year := }
+ if$
+ extra.label 'next.extra :=
+}
+
+ITERATE {first.presort}
+
+SORT
+
+EXECUTE {initialize.last.extra.num}
+
+ITERATE {forward.pass}
+
+REVERSE {reverse.pass}
+
+FUNCTION {second.presort}
+{
+ make.list.label
+ title.field field.used =
+ { sort.format.title }
+ { sortify.names }
+ if$
+ " " * list.year field.or.null sortify * " " *
+ title.field field.used =
+ 'skip$
+ { title field.or.null sort.format.title * }
+ if$
+ #1 entry.max$ substring$
+ 'sort.key$ :=
+}
+
+ITERATE {second.presort}
+
+SORT
+
+FUNCTION {begin.bib}
+{
+ preamble$ empty$
+ 'skip$
+ {
+ "\chspreambledefs{%" write$ newline$
+ preamble$ write$ "}" write$ newline$
+ "\chspreambletext{%" write$ newline$
+ preamble$ write$ "}" write$ newline$
+ }
+ if$
+ "\begin{thebibliography}{xx}" write$ newline$
+}
+
+EXECUTE {begin.bib}
+
+EXECUTE {init.state.consts}
+
+ITERATE {call.type$}
+
+FUNCTION {end.bib}
+{
+ newline$
+ "\end{thebibliography}" write$ newline$
+}
+
+EXECUTE {end.bib}
diff --git a/Master/texmf-dist/doc/latex/chscite/README b/Master/texmf-dist/doc/latex/chscite/README
index 886fe81b65d..2e508893970 100644
--- a/Master/texmf-dist/doc/latex/chscite/README
+++ b/Master/texmf-dist/doc/latex/chscite/README
@@ -11,7 +11,7 @@
%% and version 1.2 or later is part of all distributions of LaTeX version
%% 1999/12/01 or later.
-This is version 2.9 of the chscite bibliographic style, based on the
+This is version 2.99 of the chscite bibliographic style, based on the
harvard family of bibliographic styles. It includes the same fixes by
Berwin A. Turlach (berwin@alphasun.anu.edu.au) as the harvard package.
diff --git a/Master/texmf-dist/doc/latex/chscite/chscite.pdf b/Master/texmf-dist/doc/latex/chscite/chscite.pdf
index 1a8591a42dd..5de744106b5 100644
--- a/Master/texmf-dist/doc/latex/chscite/chscite.pdf
+++ b/Master/texmf-dist/doc/latex/chscite/chscite.pdf
Binary files differ
diff --git a/Master/texmf-dist/source/latex/chscite/chscite.dtx b/Master/texmf-dist/source/latex/chscite/chscite.dtx
index 491ba19451f..8146c4893a1 100644
--- a/Master/texmf-dist/source/latex/chscite/chscite.dtx
+++ b/Master/texmf-dist/source/latex/chscite/chscite.dtx
@@ -22,12 +22,12 @@
%<package>\NeedsTeXFormat{LaTeX2e}[1999/12/01]
%<package>\ProvidesPackage{chscite}
%<*package>
- [2011/09/16 v2.9 Chalmers bibliography style]
+ [2011/09/20 v2.99 Chalmers bibliography style]
%</package>
%
%<*driver>
\documentclass{ltxdoc}
-\usepackage{chscite}[2011/09/16]
+\usepackage{chscite}[2011/09/20]
\AtBeginDocument{%
\OnlyDescription%
% \CodelineIndex%
@@ -68,6 +68,7 @@
% \changes{v2.9}{2011/09/16}{Polyglossia compatibility}
% \changes{v2.9}{2011/09/16}{Various bugfixes}
% \changes{v2.9}{2011/09/16}{Improved documentation}
+% \changes{v2.99}{2011/09/16}{Fixed critical \texttt{.dtx} bug}
%
% \GetFileInfo{chscite.dtx}
%
@@ -656,7 +657,6 @@
\ExecuteOptions{english}
\ProcessOptions*
\bibliographystyle{chscite}
-\endinput
% \end{macrocode}
%
% \iffalse
diff --git a/Master/texmf-dist/tex/latex/chscite/chscite.sty b/Master/texmf-dist/tex/latex/chscite/chscite.sty
index 8dce524b5ab..c838cdbe323 100644
--- a/Master/texmf-dist/tex/latex/chscite/chscite.sty
+++ b/Master/texmf-dist/tex/latex/chscite/chscite.sty
@@ -22,7 +22,7 @@
%%
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesPackage{chscite}
- [2011/09/16 v2.9 Chalmers bibliography style]
+ [2011/09/20 v2.99 Chalmers bibliography style]
\RequirePackage{ifthen}
\@ifundefined{url}{\RequirePackage{url}}{}
\newcommand{\chsurl}[1]{\url{#1}}