From: Patrick McCarty <pnorcks@gmail.com>
Date: Tue, 28 Jul 2009 23:58:44 +0000 (-0700)
Subject: PS backend: fix 'path stencil expression
X-Git-Tag: release/2.13.4-1~263
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=48aaf43f504cfa1077a986edcfb68ac74d117065;p=lilypond.git

PS backend: fix 'path stencil expression

The absolute commands were not working because the coordinate
system needed to be translated first.

This patch fixes that issue, and it surrounds the entire
expression with gsave...grestore so that the coordinate system
is restored immediately afterward.
---

diff --git a/scm/output-ps.scm b/scm/output-ps.scm
index 64a22b4677..27a3d8f378 100644
--- a/scm/output-ps.scm
+++ b/scm/output-ps.scm
@@ -287,7 +287,7 @@
     
     
   (ly:format
-   "1 setlinecap ~a setlinewidth\n~l stroke"
+   "gsave currentpoint translate 1 setlinecap ~a setlinewidth\n~l stroke grestore"
    thickness
-   (convert-path-exps exps) ))
+   (convert-path-exps exps)))