- me->set_grob_property ("minimum-distances" , SCM_EOL);
- me->set_grob_property ("spacing-wishes", SCM_EOL);
- me->set_grob_property ("ideal-distances", SCM_EOL);
+ for (SCM s = me->get_object ("ideal-distances");
+ scm_is_pair (s); s = scm_cdr (s))
+ {
+ Spring_smob *spring = unsmob_spring (scm_car (s));
+ if (spring && spring->other_ == other)
+ {
+ *dist = spring->distance_;
+ *inv_strength = spring->inverse_strength_;
+ }
+ }