release: 1.1.65

[lilypond.git] / lily / rhythmic-column-engraver.cc

diff --git a/lily/rhythmic-column-engraver.cc b/lily/rhythmic-column-engraver.cc
index 5e03c9b3fb9ac94fe7cb2ba934e2fe3495df4585..a2f1103d8a743ea82ca63238502e21ad18f489f1 100644 (file)
--- a/lily/rhythmic-column-engraver.cc
+++ b/lily/rhythmic-column-engraver.cc
@@ -105,13 +105,19 @@ Rhythmic_column_engraver::do_pre_move_processing()
   if (ncol_p_) 
     {
       Scalar sh = get_property ("horizontalNoteShift", 0);
-      // egcs
-      if (sh.to_bool () && sh.isnum_b ())
+      if (sh.isnum_b ())
        {
          ncol_p_->set_elt_property (horizontal_shift_scm_sym,
                                     gh_int2scm (int (sh)));
        }
 
+      sh = get_property ("forceHorizontalShift" ,0);
+      if (sh.isnum_b ())
+       {
+         ncol_p_->set_elt_property (force_hshift_scm_sym,
+                                    gh_double2scm (double (sh)));
+       }
+
       typeset_element (ncol_p_);
       ncol_p_ =0;
     }