version 1.172, 2014/08/25 00:20:19
|
version 1.174, 2015/04/06 16:27:12
|
Line 118 sub start_script {
|
Line 118 sub start_script {
|
} elsif ($target eq "edit" ) { |
} elsif ($target eq "edit" ) { |
#&Apache::run::run($bodytext,$safeeval); |
#&Apache::run::run($bodytext,$safeeval); |
#$result="<br /> <$token->[1]> output: <br />$bodytext<br />Source:<br />"; |
#$result="<br /> <$token->[1]> output: <br />$bodytext<br />Source:<br />"; |
my $bodytext=&Apache::lonxml::get_all_text_unbalanced("/script",$parser); |
my $bodytext=&Apache::lonxml::get_all_text_unbalanced("/script",$parser); |
$result=&Apache::edit::tag_start($target,$token,'Script'); |
$result=&Apache::edit::tag_start($target,$token,'Script'); |
$result.=&Apache::edit::editfield($token->[1],$bodytext,'',80,4); |
|
|
my $depth = $Apache::lonxml::curdepth; |
|
$result.='<span id="LC_edit_problem_codemirror">'; |
|
unless ($env{'environment.nocodemirror'}) { |
|
# only show button if codemirror activated |
|
$result.='<input type="button" id="fitsize'.$depth.'" value="'.&mt("Dynamic size"). |
|
'" onclick="autosize(\''.$depth.'\')" />'; |
|
} |
|
$result.=&Apache::edit::editfield($token->[1],$bodytext,'',80,4).'</span>'; |
|
|
|
unless ($env{'environment.nocodemirror'}) { |
|
$result.='<script type="text/javascript"> |
|
var cm'.$depth.' = CodeMirror.fromTextArea(document.getElementById("homework_edit_'.$depth.'"), |
|
{ |
|
mode: "perl", |
|
lineWrapping: true, |
|
lineNumbers: true, |
|
tabSize: 4, |
|
indentUnit: 4, |
|
autoCloseBrackets: true, |
|
styleActiveLine: true, |
|
|
|
extraKeys: { |
|
"Tab": "indentMore", |
|
"Shift-Tab": "indentLess" |
|
} |
|
}); |
|
if(sessionStorage.getItem("autosized_'.$depth.'") != null) { |
|
document.getElementById("fitsize'.$depth.'").value = "'.&mt("Fixed size").'"; |
|
cm'.$depth.'.setSize("","auto"); |
|
} |
|
</script>'; |
|
} |
|
|
|
|
} elsif ($target eq 'meta') { |
} elsif ($target eq 'meta') { |
my $bodytext=&Apache::lonxml::get_all_text_unbalanced("/script",$parser); |
my $bodytext=&Apache::lonxml::get_all_text_unbalanced("/script",$parser); |
} |
} |
Line 645 sub end_storetc {
|
Line 679 sub end_storetc {
|
|
|
sub start_physnet { |
sub start_physnet { |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_; |
my $bodytext = '/adm/includes/physnet.sty'; |
my $bodytext = '/res/adm/includes/physnet.sty'; |
my $location=&Apache::lonnet::filelocation($Apache::lonxml::pwd['-1'],$bodytext); |
my $location=&Apache::lonnet::filelocation($Apache::lonxml::pwd['-1'],$bodytext); |
my $cbistyletext=&Apache::lonnet::getfile($location); |
my $cbistyletext=&Apache::lonnet::getfile($location); |
|
|
%$style = (%$style,&Apache::style::styleparser($target,$cbistyletext)); |
%$style = (%$style,&Apache::style::styleparser($target,$cbistyletext)); |
$$parser['-1']->unget_token($token); |
if (keys(%$style) && (($target eq 'web') || ($target eq 'tex'))) { |
|
$$parser['-1']->unget_token($token); |
|
} |
# if ( defined($$style{'physnet'}) ) { |
# if ( defined($$style{'physnet'}) ) { |
# &Apache::lonxml::newparser($parser,\$$style{'physnet'}); |
# &Apache::lonxml::newparser($parser,\$$style{'physnet'}); |
# } |
# } |