release: 1.1.8

[lilypond.git] / tex / lily-ps-defs.tex

diff --git a/tex/lily-ps-defs.tex b/tex/lily-ps-defs.tex
index 32e3d9bafa521ff1fd55a3ec28ef984868b3cdc3..92cf4e73b7be6a719b4c92538caa17ffbcae3c23 100644 (file)
--- a/tex/lily-ps-defs.tex
+++ b/tex/lily-ps-defs.tex
@@ -14,29 +14,8 @@
 % ``compiles'' operatorname binding in the body of foo, making
 % the code faster, and more reliable (less flexible)
 
-%must come before PSTeXDimen
-\special{!
-% PS helper: convert (0.2pt) to the token 0.2
-/settexdimen
-{
-        /thestring exch def
-        thestring 0 thestring length 2 sub
-        getinterval
-        token
-        pop exch pop 
-} def
-%
-/deftexdimen
-{
-        settexdimen
-        def     
-} def
-}
 % transplant a TeX dimension into the PS output.
 \def\PSsetTeXdimen#1{\expandafter\special{! /#1 (\the\csname #1\endcsname) deftexdimen}}
-% must come before lily.ps
-\PSsetTeXdimen{stafflinethickness}
-\PSsetTeXdimen{staffheight}
 {%
    \def\par{ }%         %Ugh.  Don't try this at home, kids!
    % neat file-include trick by Piet van Oostrum <piet@cs.uu.nl>
@@ -64,6 +43,23 @@
 }
 
 
+\special{!
+% PS helper: convert (0.2pt) to the token 0.2
+/settexdimen
+{
+        /thestring exch def
+        thestring 0 thestring length 2 sub
+        getinterval
+        token
+        pop exch pop 
+} def
+%
+/deftexdimen
+{
+        settexdimen
+        def     
+} def
+}
 
 \def\turnOnPostScript{%
         \PSsetTeXdimen{stafflinethickness}
@@ -78,7 +74,6 @@
 
         \special{! 
 /interline \mudelapaperinterline0  def % ugh.  Only works x.yyyy floats 
-stafflinethickness 1.2 mul /plet_t exch def
 interline 3 div /bracket_b exch def
 interline 2 mul /bracket_w exch def
 stafflinethickness 2 mul /bracket_t exch def
@@ -86,6 +81,8 @@ interline 1.5 mul /bracket_v exch def
 bracket_v /bracket_u exch def
 50 /bracket_alpha exch def
 staffheight 4 div /interline exch def
+stafflinethickness 1.2 mul /tuplet_t exch def
+stafflinethickness 2.5 mul /volta_t exch def
 1 setlinecap}
 }