- SCM od = orig_l_->description ();
- // todo:
- // gh_set_cdr_x (od, gh_int2scm (magstep_i_));
- return od;
+ Molecule m = orig_l_->find_by_name (s);
+ Box b = m.extent_box ();
+ b.scale (magnification_f_);
+ Molecule q (b,fontify_atom ((Font_metric*) this, m.get_expr ()));
+
+ return q ;