diff options
author | Hans Hagen <pragma@wxs.nl> | 2012-02-16 09:55:00 +0100 |
---|---|---|
committer | Hans Hagen <pragma@wxs.nl> | 2012-02-16 09:55:00 +0100 |
commit | d727c799380434800e74e7f7c2c8b7dd264bf6c1 (patch) | |
tree | 0d3ad06b3c42a41acbdb578245660d293d292b0a /tex/context/base/bibl-tra.mkiv | |
parent | a35b193e7e4396d213bc1283f94ba41786fd87fe (diff) | |
download | context-d727c799380434800e74e7f7c2c8b7dd264bf6c1.tar.gz |
beta 2012.02.16 09:55
Diffstat (limited to 'tex/context/base/bibl-tra.mkiv')
-rw-r--r-- | tex/context/base/bibl-tra.mkiv | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/tex/context/base/bibl-tra.mkiv b/tex/context/base/bibl-tra.mkiv index 44afd83b8..3531703ad 100644 --- a/tex/context/base/bibl-tra.mkiv +++ b/tex/context/base/bibl-tra.mkiv @@ -188,6 +188,7 @@ [pubs] [\c!state=\v!start, \c!criterium=\@@pbcriterium, + \c!headnumber=\v!always, % needed as we provide our own and need to force \c!width=] \installstructurelistprocessor{pubs:userdata}% @@ -312,8 +313,8 @@ \def\@@pbinumbercommand{\executeifdefined{\??pb:\c!numbercommand:\@@pbnumbering}\firstofoneargument} -\letvalue{\??pb:\c!numbercommand:\v!yes }\firstofoneargument -\letvalue{\??pb:\c!numbercommand:\v!no }\gobbleoneargument +\setvalue{\??pb:\c!numbercommand:\v!yes }#1{#1}% +\setvalue{\??pb:\c!numbercommand:\v!no }#1{} \setvalue{\??pb:\c!numbercommand:\v!short}#1{\bibgetvars\currentpublicationkey} \setvalue{\??pb:\c!numbercommand:\v!bib }#1{\bibgetvarn\currentpublicationkey} @@ -742,7 +743,7 @@ \def\doprocessbibtexentry#1{\typesetapublication{#1}} -\def\typesetpubslist +\unexpanded\def\typesetpubslist {\begingroup \startpacked[\v!blank]% \preloadbiblist @@ -766,7 +767,7 @@ \newif\ifinpublist -\def\initializepubslist +\unexpanded\def\initializepubslist {\def\currentlist{pubs}% \edef\@@pbnumbering{\@@pbnumbering}% \doifelse\@@pbautohang\v!yes @@ -805,12 +806,12 @@ \doifelse{\publicationlistparameter\c!maybeyear}{\v!off}{\def\maybeyear##1{}}{\def\maybeyear##1{##1}}% \forgetall} -\def\outdented#1% move to supp-box ? +\unexpanded\def\outdented#1% move to supp-box ? {\hskip-\hangindent#1\relax} %D The full list of publications -\def\completepublications +\unexpanded\def\completepublications {\dosingleempty\docompletepublications} \def\docompletepublications[#1]% @@ -874,10 +875,10 @@ {\global\advance\bibtexcounter\plusone \def\currentpublicationkey{#1}% \ctxlua{bibtex.hacks.registerplaced("#1")}% - \def\currentlist {pubs}% - \let\currentlistentrynumber \bibtexcounter - \let\currentlistentrytitle \bibtexpubtext - \let\currentlistentrypagenumber\empty + \def \currentlist {pubs}% + \edef\currentlistentrynumber {\number\bibtexcounter}% + \let \currentlistentrytitle \bibtexpubtext + \let \currentlistentrypagenumber\empty \strc_lists_apply_renderingsetup} {}} % invalid |