version 1.148.2.1, 2008/12/11 21:30:10
|
version 1.149, 2008/11/24 18:55:01
|
Line 44 BEGIN {
|
Line 44 BEGIN {
|
'window','display','storetc','physnet', |
'window','display','storetc','physnet', |
'standalone','comment','num','parse','algebra', |
'standalone','comment','num','parse','algebra', |
'LONCAPA_INTERNAL_TURN_STYLE_ON', |
'LONCAPA_INTERNAL_TURN_STYLE_ON', |
'LONCAPA_INTERNAL_TURN_STYLE_OFF')); |
'LONCAPA_INTERNAL_TURN_STYLE_OFF', |
|
'LONCAPA_INTERNAL_LONHTTPD_PORT')); |
} |
} |
|
|
sub start_LONCAPA_INTERNAL_TURN_STYLE_ON { |
sub start_LONCAPA_INTERNAL_TURN_STYLE_ON { |
Line 80 sub end_LONCAPA_INTERNAL_TURN_STYLE_OFF
|
Line 81 sub end_LONCAPA_INTERNAL_TURN_STYLE_OFF
|
return ('','no'); |
return ('','no'); |
} |
} |
|
|
|
sub start_LONCAPA_INTERNAL_LONHTTPD_PORT { |
|
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
|
if ($target eq 'web' || $target eq 'webgrade') { |
|
return '<script type="text/javascript">var lonhttpdport=\''. |
|
&Apache::loncommon::lonhttpd_port().'\';</script>'; |
|
} |
|
return ('','no'); |
|
} |
|
|
|
sub end_LONCAPA_INTERNAL_LONHTTPD_PORT { |
|
return ('','no'); |
|
} |
|
|
sub start_script { |
sub start_script { |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval)=@_; |
@Apache::scripttag::parser_env = @_; |
@Apache::scripttag::parser_env = @_; |
Line 612 sub end_algebra {
|
Line 626 sub end_algebra {
|
|
|
1; |
1; |
__END__ |
__END__ |
|
|
|
=pod |
|
|
|
=head1 NAME |
|
|
|
Apache::scripttag.pm |
|
|
|
=head1 SYNOPSIS |
|
|
|
implements <script>, <scriptlib>, <parserlib>, |
|
and <import> |
|
|
|
This is part of the LearningOnline Network with CAPA project |
|
described at http://www.lon-capa.org. |
|
|
|
|
|
=head1 NOTABLE SUBROUTINES |
|
|
|
=over |
|
|
|
=item start_LONCAPA_INTERNAL_LONHTTPD_PORT() |
|
|
|
emits a pice of javascript that says a global js variable to the |
|
current lonhttp port, currently used by the remote control to find out |
|
where to load images from |
|
|
|
=back |
|
|
|
=cut |
|
|