version 1.99, 2003/06/18 21:04:42
|
version 1.101, 2003/10/03 17:15:01
|
Line 45 BEGIN {
|
Line 45 BEGIN {
|
'window','display','storetc','physnet', |
'window','display','storetc','physnet', |
'standalone','comment', |
'standalone','comment', |
'LONCAPA_INTERNAL_TURN_STYLE_ON', |
'LONCAPA_INTERNAL_TURN_STYLE_ON', |
|
'LONCAPA_INTERNAL_TURN_STYLE_OFF', |
'LONCAPA_INTERNAL_LONHTTPD_PORT')); |
'LONCAPA_INTERNAL_LONHTTPD_PORT')); |
} |
} |
|
|
Line 63 sub end_LONCAPA_INTERNAL_TURN_STYLE_ON {
|
Line 64 sub end_LONCAPA_INTERNAL_TURN_STYLE_ON {
|
return ('','no'); |
return ('','no'); |
} |
} |
|
|
|
sub start_LONCAPA_INTERNAL_TURN_STYLE_OFF { |
|
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
|
$Apache::lonxml::usestyle=0; |
|
my $end=&Apache::lonxml::get_param('end',$parstack,$safeeval); |
|
if (!$end) { |
|
$Apache::lonxml::style_values=$$parstack[-1]; |
|
$Apache::lonxml::style_end_values=$$parstack[-1]; |
|
} else { |
|
$Apache::lonxml::style_values=$Apache::lonxml::style_end_values; |
|
$Apache::lonxml::style_end_values=''; |
|
} |
|
return ('','no'); |
|
} |
|
|
|
sub end_LONCAPA_INTERNAL_TURN_STYLE_OFF { |
|
return ('','no'); |
|
} |
|
|
sub start_LONCAPA_INTERNAL_LONHTTPD_PORT { |
sub start_LONCAPA_INTERNAL_LONHTTPD_PORT { |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
if ($target eq 'web') { |
if ($target eq 'web') { |
Line 158 sub start_display {
|
Line 177 sub start_display {
|
$target eq 'analyze') { |
$target eq 'analyze') { |
$result=''; # grade should produce no output |
$result=''; # grade should produce no output |
} |
} |
|
$Apache::lonxml::post_evaluate=0; |
} elsif ($target eq "edit" ) { |
} elsif ($target eq "edit" ) { |
#$result = |
#$result = |
# "<br /> <$token->[1]> output: <br />$bodytext<br />Source:<br />"; |
# "<br /> <$token->[1]> output: <br />$bodytext<br />Source:<br />"; |