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
> <jmccollum20140511@gmail.com <mailto:jmccollum20140511@gmail.com>> 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 : ntg-context@ntg.nl / 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
-----------------------------------------------------------------