version 1.89, 2002/09/16 19:06:57
|
version 1.90, 2002/10/07 17:57:37
|
Line 1549 EDITBUTTON
|
Line 1549 EDITBUTTON
|
my $currentstring = ''; |
my $currentstring = ''; |
my $width_param = ''; |
my $width_param = ''; |
my $height_param = ''; |
my $height_param = ''; |
my $scaling = .3; |
my $scaling = .3; |
|
|
if ($target eq 'web') { |
if ($target eq 'web') { |
$currentstring = $token->[4]; |
$currentstring = $token->[4]; |
Line 1568 EDITBUTTON
|
Line 1568 EDITBUTTON
|
my $TeXwidth = &Apache::lonxml::get_param('TeXwidth',$parstack,$safeeval); |
my $TeXwidth = &Apache::lonxml::get_param('TeXwidth',$parstack,$safeeval); |
my $TeXheight = &Apache::lonxml::get_param('TeXheight',$parstack,$safeeval); |
my $TeXheight = &Apache::lonxml::get_param('TeXheight',$parstack,$safeeval); |
my $width = &Apache::lonxml::get_param('width',$parstack,$safeeval); |
my $width = &Apache::lonxml::get_param('width',$parstack,$safeeval); |
if ($TeXwidth ne '') { |
if ($TeXwidth ne '') { |
$width_param = $TeXwidth; |
if ($TeXwidth=~/(\d+)\s*\%/) { |
} elsif ($TeXheight ne '') { |
$width_param = $1*$ENV{'form.textwidth'}/100; |
$width_param = $TeXheight/$height_param*$width_param; |
} else { |
|
$width_param = $TeXwidth; |
|
} |
|
} elsif ($TeXheight ne '') { |
|
$width_param = $TeXheight/$height_param*$width_param; |
} elsif ($width ne '') { |
} elsif ($width ne '') { |
$width_param = $width*$scaling; |
$width_param = $width*$scaling; |
} |
} |