- Real h = sl * gh_scm2double (sp->get_elt_property ("height"));
- Molecule mol (sp->lookup_l ()->filledbox ( Box (Interval (0,w), Interval (0,h))));
+ Real h = sl * gh_scm2double (sp->get_grob_property ("height"));
+ Molecule mol (Lookup::filledbox (Box (Interval (0,w), Interval (0,h))));