Merge branch 'lilypond/translation' into staging

[lilypond.git] / ps / music-drawing-routines.ps

diff --git a/ps/music-drawing-routines.ps b/ps/music-drawing-routines.ps
index 3e62f0366e68e5281b8cb3ae6e19f3aa23b22a25..d7450e452bee0c239f10fca06e70f4f40a5c40b4 100644 (file)
--- a/ps/music-drawing-routines.ps
+++ b/ps/music-drawing-routines.ps
@@ -98,20 +98,15 @@ bind def
         dup
        0.0 gt {
                setlinewidth % w h x y
+               0 setlinecap
+               1 setlinejoin
+
                rmoveto % w h
-               2 copy 0 ne exch 0 ne and
-               {
-                   0 setlinecap
-                   1 setlinejoin
-                   currentpoint % w h x1 y1
-                   4 2 roll % x1 y1 w h
-                   4 copy
-                   rectfill
-                   rectstroke
-               } {
-                   1 setlinecap
-                   rlineto stroke
-               } ifelse
+               currentpoint % w h x1 y1
+               4 2 roll % x1 y1 w h
+               4 copy
+               rectfill
+               rectstroke
        } {
                pop % w h x y
                rmoveto % w h