(c) 2002--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
-
#include "music.hh"
#include "sequential-iterator.hh"
#include "context.hh"
Volta_repeat_iterator::add_repeat_command (SCM what)
{
SCM reps = ly_symbol2scm ("repeatCommands");
- SCM current_reps = get_outlet ()->internal_get_property (reps);
+ SCM current_reps = SCM_EOL;
+ Context *where = get_outlet ()->where_defined (reps, ¤t_reps);
- Context *where = get_outlet ()->where_defined (reps);
if (where
&& current_reps == SCM_EOL || scm_is_pair (current_reps))
{
}
if (done_count_ == 1 && alt_count_ < rep_count_)
- {
- repstr = "1.--" + to_string (rep_count_ - alt_count_ + done_count_) + ".";
- }
+ repstr = "1.--" + to_string (rep_count_ - alt_count_ + done_count_) + ".";
if (done_count_ <= alt_count_)
add_repeat_command (scm_list_n (ly_symbol2scm ("volta"),
scm_makfrom0str (repstr.to_str0 ()), SCM_UNDEFINED));
}
else
- {
- add_repeat_command (ly_symbol2scm ("end-repeat"));
- }
+ add_repeat_command (ly_symbol2scm ("end-repeat"));
}
}