|
version 1.434, 2008/11/10 11:44:54
|
version 1.434.2.1, 2008/12/11 04:54:32
|
|
Line 1295 sub start_languageblock {
|
Line 1295 sub start_languageblock {
|
| $target eq 'tex' || $target eq 'analyze' || $target eq 'webgrade') { |
$target eq 'tex' || $target eq 'analyze' || $target eq 'webgrade') { |
| my $include = $token->[2]->{'include'}; |
my $include = $token->[2]->{'include'}; |
| my $exclude = $token->[2]->{'exclude'}; |
my $exclude = $token->[2]->{'exclude'}; |
| my @preferred_languages=&Apache::loncommon::preferred_languages(); |
my @preferred_languages=&Apache::lonlocal::preferred_languages(); |
| # This should not even happen, since we should at least have the server language |
# This should not even happen, since we should at least have the server language |
| if (!$preferred_languages[0]) { $preferred_languages[0]='en'; } |
if (!$preferred_languages[0]) { $preferred_languages[0]='en'; } |
| # Now loop over all languages in order of preference |
# Now loop over all languages in order of preference |
|
Line 1907 sub end_startouttext {
|
Line 1907 sub end_startouttext {
|
| my $areaid = 'homework_edit_'.$Apache::lonxml::curdepth; |
my $areaid = 'homework_edit_'.$Apache::lonxml::curdepth; |
| $text=&Apache::lonxml::get_all_text("endouttext",$parser,$style); |
$text=&Apache::lonxml::get_all_text("endouttext",$parser,$style); |
| |
|
| $result.=&Apache::edit::start_table($token)."<tr><td>".&mt('Text Block')."</td> |
$result.=&Apache::edit::start_table($token)."<tr><td>".&mt('Text Block')."</td>" |
| <td>".&mt('Delete:'). |
.'<td><span clas="LC_nobreak">'.&mt('Delete?').' ' |
| &Apache::edit::deletelist($target,$token) |
.&Apache::edit::deletelist($target,$token) |
| ."</td>"; |
.'</span></td>'; |
| unless ($env{'environment.wysiwygeditor'} eq 'on') { |
unless ($env{'environment.wysiwygeditor'} eq 'on') { |
| $result .= '<td align="left">' |
$result .= '<td align="left">' |
| .&Apache::lonhtmlcommon::dragmath_button($areaid,1) |
.&Apache::lonhtmlcommon::dragmath_button($areaid,1) |
![[BACK]](/icons/back.gif){kind=icon}
Return to structuretags.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / homework