On 2011-03-24 <18:15:31>, Cecil Westerhof wrote:
> 2011/3/24 Wolfgang Schuster <schuster.wolfgang@googlemail.com>
> 
> >
> > Am 24.03.2011 um 17:29 schrieb Cecil Westerhof:
> >
> > > \def\getdate%
> > >  {\dosinglegroupempty\dogetdate}
> > >
> > > \def\dogetdate#1%
> > >   {context{modification_date("\jobname.tex", "#1")}}
> >
> > \def\getdate
> >  {\dosingleempty\dogetdate}
> >
> > \def\dogetdate[#1]%
> >  {\ctalua{context(modification_date("\jobname.tex", "#1"))}}
> >
> 
> I have:
>     \startluacode
>       function modification_date(file, format)
>         local f    = file
>         local attr = lfs.attributes(f)
> 
>         assert (type(attr) == "table")
>         if attr.mode ~= "directory" then
>           if format == "long" then
>             return os.date("%Y-%m-%d %H:%M",attr.modification)
>           else
>             return os.date("%Y-%m-%d",attr.modification)
>           end
>         end
>       end
>     \stopluacode
> 
>     \def\getdate
>      {\dosingleempty\dogetdate}
> 
>     \def\dogetdate[#1]%
>      {\ctalua{context(modification_date("\jobname.tex", "#1"))}}
           ^
s/\\ctalua/\\ctxlua/

Regards, Philipp
> 
>     \starttext
> 
>     \getdate
> 
>     \stoptext
> 
> This gives:
> \dogetdate [#1]->\ctalua
>                          {context(modification_date("\jobname .tex", "#1"))}
> l.29 \getdate[]
> 
> ?
> 
> I tried with \getdate, \getdate{} and \getdate[].
> 
> -- 
> Cecil Westerhof

> ___________________________________________________________________________________
> 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
> ___________________________________________________________________________________