version 1.156, 2003/07/28 19:18:02
|
version 1.158, 2003/08/01 13:35:20
|
Line 1078 sub end_q {
|
Line 1078 sub end_q {
|
|
|
#-- <p> tag |
#-- <p> tag |
sub start_p { |
sub start_p { |
my ($target,$token) = @_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval) = @_; |
my $currentstring = ''; |
my $currentstring = ''; |
if ($target eq 'web') { |
if ($target eq 'web') { |
$currentstring .= $token->[4]; |
$currentstring .= $token->[4]; |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$currentstring .= '\par '; |
my $signal=1; |
|
foreach my $tag (@$tagstack) {if (lc($tag) eq 'b') {$signal=0;}} |
|
if ($signal) {$currentstring .= '\par ';} |
} |
} |
return $currentstring; |
return $currentstring; |
} |
} |
Line 1969 sub start_img {
|
Line 1971 sub start_img {
|
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') { |
if ($ENV{'browser.imagesuppress'} ne 'on') { |
if ($ENV{'browser.imagesuppress'} ne 'on') { |
$currentstring = $token->[4]; |
$currentstring.= $token->[4]; |
} else { |
} else { |
my $alttag= &Apache::lonxml::get_param |
my $alttag= &Apache::lonxml::get_param |
('alt',$parstack,$safeeval,undef,1); |
('alt',$parstack,$safeeval,undef,1); |
Line 1980 sub start_img {
|
Line 1981 sub start_img {
|
$alttag=&Apache::lonmeta::alttag |
$alttag=&Apache::lonmeta::alttag |
($Apache::lonxml::pwd[-1],$src); |
($Apache::lonxml::pwd[-1],$src); |
} |
} |
$currentstring='[IMAGE: '.$alttag.']'; |
$currentstring.='[IMAGE: '.$alttag.']'; |
} |
} |
} elsif ($target eq 'tex') { |
} elsif ($target eq 'tex') { |
$src=&Apache::lonnet::filelocation($Apache::lonxml::pwd[-1],$src); |
$src=&Apache::lonnet::filelocation($Apache::lonxml::pwd[-1],$src); |
&image_replication($src); |
&image_replication($src); |
|
|
#if original gif/jpg/png file exist do following: |
#if original gif/jpg/png file exist do following: |
if (-e $src) { |
if (-e $src) { |
#defines the default size of image |
#defines the default size of image |