patch::: 1.3.95.tca2

[lilypond.git] / lily / mark-engraver.cc

diff --git a/lily/mark-engraver.cc b/lily/mark-engraver.cc
index 9ada64765fad07f3d154e6c986bc7e5f4e5d92bc..eeada948563860f7cb47457961907211068c121a 100644 (file)
--- a/lily/mark-engraver.cc
+++ b/lily/mark-engraver.cc
@@ -102,7 +102,7 @@ Mark_engraver::create_items (Request *rq)
   if (text_p_)
     return;
 
-  SCM s = get_property ("basicMarkProperties");
+  SCM s = get_property ("RehearsalMark");
   text_p_ = new Item (s);
 
 
@@ -127,7 +127,7 @@ Mark_engraver::create_items (Request *rq)
     {
       text_p_
        ->set_elt_property ("padding",
-                           gh_double2scm(paper_l ()->get_var ("interline")));
+                           gh_double2scm(paper_l ()->get_var ("staffspace")));
     }