--- loncom/homework/randomlabel.pm 2006/11/07 02:39:58 1.85 +++ loncom/homework/randomlabel.pm 2007/05/10 10:27:22 1.86 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # random labelling tool # -# $Id: randomlabel.pm,v 1.85 2006/11/07 02:39:58 albertel Exp $ +# $Id: randomlabel.pm,v 1.86 2007/05/10 10:27:22 foxr Exp $ # # Copyright Michigan State University Board of Trustees # @@ -269,11 +269,15 @@ sub end_bgimg { &Apache::lonxml::debug("Width $width_param"); &Apache::lonxml::debug("Scale factors: $label_xscale $label_yscale"); my $dirty_width = $width_param + 5; + # + # Somewhere here it looks like height_param and + # width_param got backwards... + # $result .= '\parbox{'.$dirty_width.'mm}{'; $result .= " $src \n"; $result .= '\setlength{\unitlength}{1mm}'."\n"; $result .= '\begin{picture}('."$height_param,$width_param)"; - $result .= "(0,-$height_param)"; + $result .= "(0,-$width_param)"; $result .= "\n"; $Apache::lonxml::debug = 0;