[NTG-context] Left border of a rectangle (Metafun)

[Fabrice Couvreur]

Hi,
I want to draw the left border of the rectangle, but it is drawn in the
middle.
Why ?
Thank you,
Fabrice

\setupcolors[state=start]


\definecolor[MyColorA][c=0.3, m=0.00, y=0.00, k=0.05]



\defineoverlay
  [Funny]
  [\useMPgraphic{Funny}]

\startuseMPgraphic{Funny}
    interim linecap := butt ;
    path p ;
    p := unitsquare xyscaled (OverlayWidth,OverlayHeight) ;
    drawoptions (withpen pencircle scaled 6.5pt withcolor
\MPcolor{MyColorA}) ;
    draw ulcorner p--llcorner p ;
\stopuseMPgraphic

\defineframedtext
  [Methode]
  [before={\blank},
   after={\blank},
   frame=off,
   background=Funny,
   width=\textwidth,
   height=fit]

\starttext

\startMethode
\input knuth
\stopMethode

\stoptext
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://www.ntg.nl/pipermail/ntg-context/attachments/20150829/81676a86/attachment.html>