lilypond-1.3.102

diff --git a/lily/musical-request.cc b/lily/musical-request.cc
index 81183d7d29dc098b3f87b72e67257c658d9d2843..43b238f8772f1bbc95776db833aeaa6c551a0f78 100644 (file)
--- a/lily/musical-request.cc
+++ b/lily/musical-request.cc
@@ -128,7 +128,3 @@ Articulation_req::do_equal_b (Request const* r) const
 }
 
 
-Script_req::Script_req ()
-{
-  set_direction (CENTER);
-}

diff --git a/lily/request.cc b/lily/request.cc
index a8db23eec93f09f9a304a483d2b26302a10c8e79..90831a5cab5d42db3d7b11f74fd94e8ca2cb69ce 100644 (file)
--- a/lily/request.cc
+++ b/lily/request.cc
@@ -29,6 +29,13 @@ Request::Request ()
   set_mus_property ("type", ly_symbol2scm ("request"));
 }
 
+
+
+Script_req::Script_req ()
+{
+  set_direction (CENTER);
+}
+
 void
 Script_req::set_direction (Direction d)
 {

diff --git a/lily/script-engraver.cc b/lily/script-engraver.cc
index 6947d403907f2bf32e16fbfebd7ccbc5fc7a03e6..8474f757226c986eca56a096a2bc23be62bdcf76 100644 (file)
--- a/lily/script-engraver.cc
+++ b/lily/script-engraver.cc
@@ -85,7 +85,8 @@ Script_engraver::do_process_music()
       SCM priority = gh_car (list);
 
       
-      if (to_dir (relative_stem_dir))
+      if (!isdir_b (force_dir)
+         && to_dir (relative_stem_dir))
        p->set_elt_property ("side-relative-direction", relative_stem_dir);
       else
        p->set_elt_property ("direction", force_dir);