[pstricks] redefining pspicture environment

[وفا خلیقی]

I want to redefine pspicture environment so that when I say for example

\begin{pspicture}(0,0)(2,2)

\end{pspicture}

I really mean to have

\begin{LTR}
\begin{pspicture}(0,0)(2,2)

\end{pspicture}
\end{LTR}

So this is what I did:

\let\origin at pspicture=\pspicture
\let\origin at endpspicture=\endpspicture
\def\pspicture{\LTR\origin at pspicture}
\def\endpspicture{\origin at endpspicture\endLTR}

provided that LTR environment is already defined in xepersian package. Is
the above code ok or I should change it?

-- VK
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://tug.org/pipermail/pstricks/attachments/20090328/6a16abba/attachment.html