From dc56a5bbe8069dd54fad6f8777e836f9deda7908 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Thu, 18 Mar 2021 21:11:17 +0000 Subject: optex (18mar21) git-svn-id: svn://tug.org/texlive/trunk@58515 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/luatex/optex/base/usebib.opm | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'Master/texmf-dist/tex/luatex/optex/base/usebib.opm') diff --git a/Master/texmf-dist/tex/luatex/optex/base/usebib.opm b/Master/texmf-dist/tex/luatex/optex/base/usebib.opm index fbf4300356d..f37d21b3159 100644 --- a/Master/texmf-dist/tex/luatex/optex/base/usebib.opm +++ b/Master/texmf-dist/tex/luatex/optex/base/usebib.opm @@ -1,6 +1,6 @@ %% This is part of the OpTeX project, see http://petr.olsak.net/optex -\_codedecl \MakeReference {Reading bib databases <2020-03-13>} % loaded on demand by \usebib +\_codedecl \MakeReference {Reading bib databases <2021-03-12>} % loaded on demand by \usebib \_doc ----------------------------- Loading the `librarian.tex` macro package. See `texdoc librarian` @@ -24,6 +24,8 @@ \_cod ----------------------------- \_def\_usebib/#1 (#2) #3 {% + \_let\_citeI=\_relax \_xdef\_citelist{\_citelist\_citelistB}% + \_global\_let\_addcitelist=\_writeXcite \_ifx\_citelist\_empty \_opwarning{No cited items. \_noexpand\usebib ignored}% \_else @@ -40,13 +42,11 @@ "\_cs{_lan:\_the\_language}" (using "en")}% \_language=0 \_chardef\_documentlanguage=0 \_fi - \_let\_citeI=\_relax \_xdef\_citelist{\_citelist\_citelistB}% - \_global\_let\_addcitelist=\_writeXcite - \_def\_tmp##1[*]##2\_relax{\_def\_tmp{##2}}\_expandafter\_tmp\_citelist[*]\_relax + \_def\_tmp##1[*]##2\_relax{\_def\_tmp{##2}}\_ea\_tmp\_citelist[*]\_relax \_ifx\_tmp\_empty\_else % there was \nocite[*] used. \_setbox0=\_vbox{\_hsize=\_maxdimen \_def\_citelist{}\_adef@{\_readbibentry}% \_input #3.bib - \_expandafter}\_expandafter\_def\_expandafter\_citelist\_expandafter{\_citelist}% + \_ea}\_ea\_def\_ea\_citelist\_ea{\_citelist}% \_fi \_def\_citeI[##1]{\_csname lb@cite\_endcsname{##1}{\_bibpart}{}{}}\_citelist \_BibFile{#3}% @@ -370,6 +370,8 @@ character is sorted before `A`. History: -------- +2021-03-12 \_citelistB added before first test. +2021-02-15 \_expandafter -> \_ea Apr. 2014: released in OPmac Jan. 2016: "first entry wins" implemented Apr. 2016: \readentry -> \readbibentry, \usebib->\MakeReference -- cgit v1.2.3