X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ftext-interface.cc;h=d930cdaa372868622e4624883c4ace2f5539e2a9;hb=84a3f805e16aeec81ea36e33fa7e7e069ecec9f9;hp=4598246163af04abbab830d2e6bf23f0186aaa9a;hpb=7fe3cccd7cfcc4d0df003bc887694779354febfa;p=lilypond.git

diff --git a/lily/text-interface.cc b/lily/text-interface.cc
index 4598246163..d930cdaa37 100644
--- a/lily/text-interface.cc
+++ b/lily/text-interface.cc
@@ -134,6 +134,7 @@ Text_interface::interpret_markup (SCM layout_smob, SCM props, SCM markup)
       scm_dynwind_unwind_handler (markup_down_depth, 0, SCM_F_WIND_EXPLICITLY);
       if (markup_depth > max_depth)
         {
+          scm_dynwind_end ();
           string name = ly_symbol2string (scm_procedure_name (func));
           // TODO: Also print the arguments of the markup!
           non_fatal_error (_f ("Markup depth exceeds maximal value of %d; "