On 9/15/2021 5:06 AM, Joey McCollum via ntg-context wrote:
All right, I figured out where I needed to make this change for it to
take effect. The relevant script is publ-aut.lua. The code I needed to
change was for the "oneauthor" function definition, which itself is
located in the "btxauthor" function definition. My changes are detailed
below:
did you try to stay at the tex end? like:
% \startsetups \s!btx:\s!cite:\s!author:invertedfirst
% \ifnum\currentbtxauthorindex>\plusone
% \btxsetauthorvariant{inverted}
% \else
% \btxsetauthorvariant{normal}
% \fi
% \fastsetup{\s!btx:\s!cite:\s!author:\btxauthorvariant}
% \stopsetups
\startsetups \s!btx:\s!cite:\s!author:invertedfirst
\ifnum\currentbtxauthorindex>\plusone
\fastsetup{\s!btx:\s!cite:\s!author:inverted}
\else
\fastsetup{\s!btx:\s!cite:\s!author:normal}
\fi
\stopsetups
```
local function oneauthor(i,last,justone)
local author = split[i]
if index then
ctx_btxstartauthor(i,1,0)
elseif last then
ctx_btxstartauthor(i,1,0)
ctx_btxsetconcat(0)
if combiner == "invertedfirst" then
if i == 1 then
ctx_btxsetauthorvariant("inverted")
else
ctx_btxsetauthorvariant("normal")
end
else
ctx_btxsetauthorvariant(combiner)
end
else
local state = author.state or 0
ctx_btxstartauthor(i,max,state)
ctx_btxsetconcat(concatstate(i,max))
if combiner == "invertedfirst" then
if i == 1 then
ctx_btxsetauthorvariant("inverted")
else
ctx_btxsetauthorvariant("normal")
end
else
ctx_btxsetauthorvariant(combiner)
end
end
local initials = author.initials
if initials and #initials > 0 then
ctx_btxsetinitials() --
(concat(the_initials(initials,symbol)," "))
end
local firstnames = author.firstnames
if firstnames and #firstnames > 0 then
ctx_btxsetfirstnames() -- (concat(firstnames," "))
end
local vons = author.vons
if vons and #vons > 0 then
ctx_btxsetvons() -- (concat(vons," "))
end
local surnames = author.surnames
if surnames and #surnames > 0 then
ctx_btxsetsurnames() -- (concat(surnames," "))
end
local juniors = author.juniors
if juniors and #juniors > 0 then
ctx_btxsetjuniors() -- (concat(juniors," "))
end
if not index and i == max then
if split.others then
ctx_btxsetoverflow(1)
else
local overflow = #split - max
if overflow > 0 then
ctx_btxsetoverflow(overflow)
end
end
end
if combiner == "invertedfirst" then
if i == 1 then
ctx_btxsetup("inverted")
else
ctx_btxsetup("normal")
end
else
ctx_btxsetup(combiner)
end
ctx_btxstopauthor()
end
```
I'll admit that the addition of entire if-else blocks around whether or
not the combiner is a specific value may not be the best practice in
terms of future maintenance (especially if similar index-dependent
authorconversions are needed in the future). Alternatively, the
"btxauthor" function could populate a "combiners" array of length "max"
with a specific authorconversion for each author in the split; for most
authorconversions, all entries in this array would be the same, but for
authorconversions like "invertedfirst", the first entry would be
different from the rest. Then, the "oneauthor" function could just
reference combiners[i] instead of combiner.
Joey
On Fri, Sep 3, 2021 at 10:48 PM Joey McCollum
<[email protected] <mailto:[email protected]>> wrote:
Hi,
I mentioned this in an earlier e-mail but thought that now might be
a good time to describe this issue in detail. I'd like to define a
new authorconversion that renders the first author in a list
differently than the remaining authors in the list. Specifically,
I'd like to use the "inverted" authorconversion for the first author
and the "normal" authorconversion for the rest.
In the newer bibl-bib.lua file, I can see what I might have to
modify to accomplish this (I added the if combiner ==
"invertedfirst" block):
```
function authors.concat(author,combiner,what,settings)
if type(combiner) == "string" then
combiner = authors[combiner or "normal"] or authors.normal
end
local split = splitauthors(author)
local setting = settings[what]
local etallimit, etaldisplay, etaltext = 1000, 1000, ""
if setting then
etallimit = settings.etallimit or 1000
etaldisplay = settings.etaldisplay or etallimit
etalltext = settings.etaltext or ""
end
local max = #split
if max > etallimit and etaldisplay < max then
max = etaldisplay
end
if combiner == "invertedfirst" then
for i=1,max do
if i == 1 then
split[i] = authors.inverted(split[i],settings)
else
split[i] = authors.normal(split[i],settings)
end
end
else
for i=1,max do
split[i] = combiner(split[i],settings)
end
end
local result = bibtexconcat(split,settings)
if max < #split then
return result
else
return result .. etaltext
end
end
```
Unfortunately, this doesn't seem to do anything. It's not clear to
me how bibl-bib.lua and bibl-bib.mkiv are being used by the other
publication support modules, if they're being used at all
(publ-ini.mkiv doesn't appear to register it, anyway). Is there
another file I'd have to change to make "invertedfirst" a working
authorconversion? Is there a similar block of code in publ-ini.lua
where I should be implementing this change instead?
Thanks!
Joey
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the
Wiki!
maillist : [email protected] / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
--
-----------------------------------------------------------------
Hans Hagen | PRAGMA ADE
Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
tel: 038 477 53 69 | www.pragma-ade.nl | www.pragma-pod.nl
-----------------------------------------------------------------
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the
Wiki!
maillist : [email protected] / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage : http://www.pragma-ade.nl / http://context.aanhet.net
archive : https://bitbucket.org/phg/context-mirror/commits/
wiki : http://contextgarden.net
___________________________________________________________________________________
