--- loncom/homework/structuretags.pm 2008/05/27 22:25:56 1.421
+++ loncom/homework/structuretags.pm 2008/07/08 09:54:30 1.424
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.421 2008/05/27 22:25:56 www Exp $
+# $Id: structuretags.pm,v 1.424 2008/07/08 09:54:30 foxr Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -312,24 +312,28 @@ sub remember_problem_state {
';
}
-sub problem_edit_header {
- return ''.
- &Apache::structuretags::remember_problem_state().'
-
';
+}
+
+sub problem_edit_header {
+ return ''.
+ &Apache::structuretags::remember_problem_state().'
+
@@ -340,17 +344,8 @@ sub problem_edit_header {
sub problem_edit_footer {
return '
'.
@@ -451,33 +446,15 @@ $show_all
$show_all
";
}
- my %langchoices=('' => '');
- foreach (&Apache::loncommon::languageids()) {
- if (&Apache::loncommon::supportedlanguagecode($_)) {
- $langchoices{&Apache::loncommon::supportedlanguagecode($_)}
- = &Apache::loncommon::plainlanguagedescription($_);
- }
- }
$result.='
'.&mt('Apply style file: ').'
&').'" />
'.&mt('Select').'
-
+
@@ -1893,6 +1870,7 @@ sub end_startouttext {
my $text='';
if ($target eq 'edit') {
+ my $areaid = 'homework_edit_'.$Apache::lonxml::curdepth;
$text=&Apache::lonxml::get_all_text("endouttext",$parser,$style);
$result.=&Apache::edit::start_table($token)."".&mt('Text Block')." |
".&mt('Delete:').
@@ -1900,7 +1878,9 @@ sub end_startouttext {
." |
".
&Apache::edit::insertlist($target,$token).
- ' | ' .
+ ' | '.
+ &Apache::lonhtmlcommon::dragmath($areaid).' | '.
+ '' .
&Apache::loncommon::helpLatexCheatsheet().
&Apache::edit::end_row().
&Apache::edit::start_spanning_row()."\n".
|