--- loncom/xml/lontable.pm 2011/10/06 23:22:22 1.20 +++ loncom/xml/lontable.pm 2011/11/30 18:01:33 1.21 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Generating TeX tables. # -# $Id: lontable.pm,v 1.20 2011/10/06 23:22:22 raeburn Exp $ +# $Id: lontable.pm,v 1.21 2011/11/30 18:01:33 raeburn Exp $ # # # Copyright Michigan State University Board of Trustees @@ -1096,32 +1096,6 @@ sub generate { #--------------------------------------------------------------------------- -# -# Private methods: -# - -# -# Convert size with units -> size in cm. -# The resulting size is floating point with no units so that it can be used in -# computation. Note that an illegal or missing unit is treated silently as -# cm for now. -# -sub size_to_cm { - my ($this, $size_spec) = @_; - my ($size, $units) = split(/ /, $size_spec); - if (lc($units) eq 'mm') { - return $size / 10.0; - } - if (lc($units) eq 'in') { - return $size * 2.54; - } - - return $size; # Default is cm. -} - - - -#--------------------------------------------------------------------------- # # Private methods: #