From caa846dc922810ac9cb8f9d739efddd67aedaa56 Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Tue, 26 Mar 2002 21:48:13 +0000
Subject: [PATCH] lilypond-1.1.36

---
 lily/bow.cc  | 5 +++--
 lily/slur.cc | 1 -
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/lily/bow.cc b/lily/bow.cc
index c634746b1f..9f198376d5 100644
--- a/lily/bow.cc
+++ b/lily/bow.cc
@@ -35,10 +35,11 @@ Bow::do_brew_molecule_p () const
   Real dy = c[3].y () - c[0].y ();
   Molecule a;
 
-  if (!dash_i_)
+  SCM d =  get_elt_property (dashed_scm_sym);
+  if (d == SCM_BOOL_F)
     a = lookup_l ()->slur (c);
   else
-    a = lookup_l ()->dashed_slur (c, thick, dash_i_);
+    a = lookup_l ()->dashed_slur (c, thick, gh_scm2int (SCM_CDR(d)));
 
   if (check_debug && !monitor->silent_b ("Bow"))
     {
diff --git a/lily/slur.cc b/lily/slur.cc
index f4d58d9b75..3e2b5d1abb 100644
--- a/lily/slur.cc
+++ b/lily/slur.cc
@@ -312,7 +312,6 @@ Slur::get_encompass_offset_arr () const
       notes.push (info.o_ - left);
     }
   Encompass_info info (encompass_arr_.top (), dir_, this);
-  // [encompass_arr_.size () - 1]
   
   // urg:
   Slur* urg = (Slur*)this;
-- 
2.39.5