release: 0.1.22

[lilypond.git] / mf / feta-macros.mf

diff --git a/mf/feta-macros.mf b/mf/feta-macros.mf
index 7666427515eee69edce84055b4a0dac9fc6c4024..e50ef987811ac5b6e81dc863c325fbf893c7fcd7 100644 (file)
--- a/mf/feta-macros.mf
+++ b/mf/feta-macros.mf
@@ -25,6 +25,20 @@ def scaledabout(expr point, scale) =
        shifted -point scaled scale shifted point
 enddef;
 
+
+%
+% make a local (restored after endgroup) copy of t_var 
+%
+def local_copy(text type, t_var)=
+       save copy_temp;
+       type copy_temp; 
+       copy_temp := t_var;
+       save t_var;
+       type t_var;
+       t_var := copy_temp;
+enddef;
+
+
 %
 % Urgh! Want to do parametric types
 %