]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/bar-check-iterator.cc
(setup_paths): Bugfix: do not store result
[lilypond.git] / lily / bar-check-iterator.cc
index bc617a3d11020ea0c3e2e56ef8b6b39c985d4328..487d3a551bbbd7a8497f6ed7ae3f7f47ae6385d1 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2001--2005  Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c) 2001--2005  Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "simple-music-iterator.hh"
@@ -40,7 +40,7 @@ Bar_check_iterator::process (Moment m)
       SCM check = tr->get_property ("ignoreBarChecks");
       if (to_boolean (check))
        return;
-      
+
       SCM mp = tr->get_property ("measurePosition");
       SCM sync = tr->get_property ("barCheckSynchronize");
 
@@ -53,7 +53,8 @@ Bar_check_iterator::process (Moment m)
          bool warn = true;
          if (to_boolean (sync))
            {
-             tr = tr->where_defined (ly_symbol2scm ("measurePosition"));
+             SCM mp;
+             tr = tr->where_defined (ly_symbol2scm ("measurePosition"), &mp);
              Moment zero;
              tr->set_property ("measurePosition", zero.smobbed_copy ());
            }