Re: [NTG-context] checking the first word in a command

26 Jan 2015

      Hi Hans,

Nice code Hans!… But somehow your replacer code gives always « el » even in front of « señora »…
It seems that your lua code for replacer sees « señor » and does not check whether it is « señora » or not.
If one modifies a little bit the code into the following, the issue is solved: (changing « señora » into « senora »)
%%%%%%%%%%%
\startluacode

local replacer = lpeg.replacer {
	["senora"] = "la señora",
	["señor"]  = "el señor",
}

function document.MaleOrFemale(str)
   context(lpeg.match(replacer,str))
end

\stopluacode

\unexpanded\def\MaleOrFemale#1%
 {\ctxlua{document.MaleOrFemale("#1")}}

\starttext
whatever \MaleOrFemale{señor Juan Martínez} and \MaleOrFemale{senora María Pérez}
\stoptext
%%%%%%%%%%%

Is it possible to have your replacer check the entire first words?

Best regards: OK
...
On 26 Jan 2015, at 18:43, Hans Hagen  wrote:
On 1/26/2015 5:49 PM, Pablo Rodriguez wrote:
...
Dear list,
I have the following sample:
\starttext
\def\Persona{señor Juan Martínez}
    \def\Persona{señora María Pérez}
El/La \Persona\ ha aprobado.
    \stoptext
How can I replace "El/La" in text with a command that can assign the
proper article?
I could use the translate module, but the real case is more complex than
the previous sample.
What I need in the command is that it can check the first word in the
command \Persona and assign "el" or "la".
Which is the right way to do this?
\startluacode
local replacer = lpeg.replacer {
   ["señor"]  = "el señor",
   ["señora"] = "la señora",
}
function document.MaleOrFemale(str)
   context(lpeg.match(replacer,str))
end
\stopluacode
\unexpanded\def\MaleOrFemale#1%
 {\ctxlua{document.MaleOrFemale("#1")}}
\starttext
whatever \MaleOrFemale{señor Juan Martínez} and \MaleOrFemale{señora María Pérez}
\stoptext
-----------------------------------------------------------------
                                         Hans Hagen | PRAGMA ADE
             Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
   tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com
                                            | www.pragma-pod.nl
-----------------------------------------------------------------
___________________________________________________________________________________
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://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________

Re: [NTG-context] checking the first word in a command

Otared Kavian