]> git.donarmstrong.com Git - lilypond.git/blobdiff - tex/fetdefs.tex
release: 0.1.37
[lilypond.git] / tex / fetdefs.tex
index 0301959589d47170a077ca4bb2680b6076be347a..85d4121aecfe9e2da87dbf4a9be0b5c7b7eb445b 100644 (file)
@@ -66,7 +66,6 @@
 
 
 
-\def\turnOnExperimentalFeatures{
 
 %
 % WARNING: don't leave blank lines in the PS-code; they are
 %
 
 
+\def\turnOnPostScript{
+\def\embeddedps##1{
+        %
+        % This sets CTM so that you get to the currentpoint
+        % by executing a 0 0 moveto
+        \special{ps: @beginspecial @setspecial ##1 @endspecial}       
+}
 \special{ps:
 /draw_decresc
         {
         }
         def
 }
+}
 
-
+\def\turnOnExperimentalFeatures{
 % draw a slur in embedded postscript
 \special{ps:
 /xbow 1 3 div def
 }
 
 \def\embeddedtex#1{#1}
-\def\embeddedps#1{
-        %
-        % This sets CTM so that you get to the currentpoint
-        % by executing a 0 0 moveto
-        \special{ps: @beginspecial @setspecial #1 @endspecial}       
-}
+
 \def\embeddedmf#1{
         \edef\embedid{feta-sleur-\number\embedcount}
         \immediate\openout\embedfile=\embedid.mf