[pstricks] polygon edges

[Herbert Voss]

Patrick Drechsler schrieb:

> Is there an error in my code (or a better way of accomplishing this)?

with setlinejoin

Herbert


\documentclass{article}
  \usepackage{pst-optic}
\begin{document}
\begin{pspicture}(-5,-5)(5,5)
   \pnode(-3.75,-2){O1}
   \pnode(3.75,-2){O2}
   \pnode(-4.75,-2.75){O3}
   \pnode(4.75,-2.75){O4}
   \pnode(-4.75,-5){O5}
   \pnode(4.75,-5){O6}
   \pscustom[linewidth=3pt]{%
     \code{1 setlinejoin}
     \pspolygon(O1)(O2)(O4)(O3)
   }
   \psline[linewidth=3pt](O4)(O6)\psline[linewidth=3pt](O3)(O5)%
\end{pspicture}
\end{document}