From: Han-Wen Nienhuys <hanwen@xs4all.nl>
Date: Sat, 20 Mar 2004 22:33:49 +0000 (+0000)
Subject: (acknowledge_audio_element): bugfix: use
X-Git-Tag: release/2.1.33~9
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=8e0f1c2fed01069a45c8a8f8dfe17b7e692b1006;p=lilypond.git

(acknowledge_audio_element): bugfix: use
and init ties_created_
---

diff --git a/ChangeLog b/ChangeLog
index d30fc3ab0a..9f45dbb2b5 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,5 +1,8 @@
 2004-03-20  Han-Wen Nienhuys   <hanwen@xs4all.nl>
 
+	* lily/tie-performer.cc (acknowledge_audio_element): bugfix: use
+	and init ties_created_
+
 	* lily/include/music-iterator.hh (IMPLEMENT_CTOR_CALLBACK): remove
 	doc string from IMPLEMENT_CTOR_CALLBACK().
 
diff --git a/lily/tie-performer.cc b/lily/tie-performer.cc
index 92cde85eb5..c5e70cabb1 100644
--- a/lily/tie-performer.cc
+++ b/lily/tie-performer.cc
@@ -38,6 +38,7 @@ Tie_performer::Tie_performer ()
 {
   event_ = 0;
   last_event_  = 0;
+  ties_created_ = false;
 }
 
 
@@ -77,6 +78,7 @@ Tie_performer::acknowledge_audio_element (Audio_element_info inf)
 			     left_mus->get_property ("pitch")))
 	    {
 	      an->tie_to (th);
+	      ties_created_ = true;  
 	    }
 	}
     }
diff --git a/scm/lily.scm b/scm/lily.scm
index 0797a64e0a..29c6f8d07d 100644
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -7,8 +7,8 @@
 
 ;;; Library functions
 
-;(if (defined? 'set-debug-cell-accesses!)
-;    (set-debug-cell-accesses! #t))
+(if (defined? 'set-debug-cell-accesses!)
+    (set-debug-cell-accesses! #f))
 
 (use-modules (ice-9 regex)
 	     (ice-9 safe)