loncom/xml/londefdef.pm - diff

Return to londefdef.pm CVS log

Up to [LON-CAPA] / loncom / xml

version 1.155, 2003/07/25 10:44:36	version 1.156, 2003/07/28 19:18:02
Line 25	Line 25
# /home/httpd/html/adm/gpl.txt	# /home/httpd/html/adm/gpl.txt
#	#
# http://www.lon-capa.org/	# http://www.lon-capa.org/
#	## Copyright for TtHfunc and TtMfunc by Ian Hutchinson.
# Copyright for TtHfunc and TtMfunc by Ian Hutchinson.
# TtHfunc and TtMfunc (the "Code") may be compiled and linked into	# TtHfunc and TtMfunc (the "Code") may be compiled and linked into
# binary executable programs or libraries distributed by the	# binary executable programs or libraries distributed by the
# Michigan State University (the "Licensee"), but any binaries so	# Michigan State University (the "Licensee"), but any binaries so
Line 2011 sub start_img {	Line 2010 sub start_img {
} elsif ($width ne '') {	} elsif ($width ne '') {
$width_param = $width*$scaling;	$width_param = $width*$scaling;
}	}
	if ($width_param > $ENV{'form.textwidth'}) {$width_param =0.95*$ENV{'form.textwidth'}}
my $file;	my $file;
my $path;	my $path;
if ($src =~ m!(.)/([^/])$!) {	if ($src =~ m!(.)/([^/])$!) {