\def\eDroppedCaps
    {\DroppedCaps
        {} {ptmr8r}
        {2.2\baselineskip} {2pt} {\baselineskip} {2}}


\defineXMLenvironment[body]
  {\bgroup
   \startcolumns[rule=on,n=2,tolerance=strict]
   %\startcolumnset[twocolumns]
   \rm\setupwhitespace[none]
   \setupindenting[small,yes]
   \noindentation
   }
  {\stopcolumns
   %\stopcolumnset
   \egroup}

\defineXMLenvironment [document]     {}                           {}

\defineXMLcommand[p] {\par}
\defineXMLcommand[tex] \TeX\
\defineXMLcommand     [dropped-caps] \eDroppedCaps


\starttext
\processXMLfilegrouped {knuth.xml}
\stoptext

                                                                                
