}
if (Paper_column::get_rank (p) < Paper_column::get_rank (me))
- {
- programming_error ("Adding reverse rod");
- }
+ programming_error ("Adding reverse rod");
mins = scm_cons (scm_cons (p->self_scm (), newdist), mins);
me->set_object ("minimum-distances", mins);