On 18-1-2012 00:02, Wolfgang Schuster wrote:
Hi,

can the \defineplistplacement command in the same way be modified as the 
\defineheadplacement command to allow

   \definelistplacement[…][…]#1#2#3{…} % old form with parameters

and

   \definelistplacement[…][…]{…} % new form without parameters


\unexpanded\def\definelistplacement
   {\dodoubleempty\dodefinelistplacement}

\def\dodefinelistplacement[#1][#2]%
   {\setvalue{\??listelement#1}%
      {\doifelsenothing{#2}
         {\getvalue{\??listelement\v!command}}%
         {\expandcheckedcsname\??listelement{#2}\v!command}%
       \setlistparameter\c!command{\getvalue{\??listelementcommand#1}}}%
    \doifnextbgroupelse
      {\dodefinelistplacementyes{#1}}
      {\dodefinelistplacementnop{#1}}}

\def\dodefinelistplacementyes#1%
   {\setvalue{\??listelementcommand#1}##1##2}

\def\dodefinelistplacementnop#1%
   {\setvalue{\??listelementcommand#1}}

ok, done (btw, that module is on the to do list anyway)


-----------------------------------------------------------------
                                          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
-----------------------------------------------------------------
_______________________________________________
dev-context mailing list
dev-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/dev-context

Reply via email to