Index: ps/music-drawing-routines.ps |
diff --git a/ps/music-drawing-routines.ps b/ps/music-drawing-routines.ps |
index 03df7c03cb7735e5f8f4746983e19384cb85ea19..468e910b0a1a4f3419d8ab13fdf07df247f78b0f 100644 |
--- a/ps/music-drawing-routines.ps |
+++ b/ps/music-drawing-routines.ps |
@@ -97,10 +97,10 @@ bind def |
/draw_round_box % width height x y blot |
{ |
- 0 max setlinewidth |
+ dup 0 lt { pop 0 } if setlinewidth |
matrix currentmatrix 5 1 roll |
currentpoint translate newpath translate |
- 2 copy 0 min exch 0 min exch translate |
+ 2 copy dup 0 gt { pop 0 } if exch dup 0 gt { pop 0 } if exch translate |
abs exch abs exch |
currentlinewidth 0 eq |
{ % straight corners |