--- loncom/homework/structuretags.pm 2009/06/09 16:33:55 1.450 +++ loncom/homework/structuretags.pm 2009/07/06 17:10:10 1.454 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # definition of tags that give a structure to a document # -# $Id: structuretags.pm,v 1.450 2009/06/09 16:33:55 bisitz Exp $ +# $Id: structuretags.pm,v 1.454 2009/07/06 17:10:10 droeschl Exp $ # # Copyright Michigan State University Board of Trustees # @@ -272,6 +272,7 @@ sub page_start { if (!defined($found{'form'})) { $form_tag_start='
'. &problem_edit_buttons().' -
+
'.&Apache::lonxml::message_location().' '. @@ -396,9 +397,9 @@ sub problem_edit_header { sub problem_edit_footer { return '
'. @@ -435,12 +436,14 @@ sub problem_web_to_edit_header { my $show_all_foils_text = ($Apache::lonhomework::parsing_a_task) ? - &mt(' Show All Instances') - : &mt(' Show All Foils'); + &mt('Show All Instances') + : &mt('Show All Foils'); - my $show_all= ''; + $show_all.= ' /> '.$show_all_foils_text + .''; @@ -513,7 +516,7 @@ $show_all -
+
@@ -537,7 +540,7 @@ $show_all $result.='
-
+
'; $result.=''; $result .= ''; $result.='
-
+
'.&Apache::lonxml::message_location().' '; return $result; @@ -2051,15 +2054,16 @@ sub start_simpleeditbutton { my $url=$env{'request.noversionuri'}; $url=~s/\?.*$//; my ($symb) = &Apache::lonnet::whichuser(); -# Warning make more sense and is more important on edit screen +# Warning makes more sense and is more important on edit screen # $result='

' # .&mt('Note: it can take up to 10 minutes for changes to take effect for all users.') # .&Apache::loncommon::help_open_topic('Caching') # .'

'; - $result.=&Apache::lontemplate::start_functionslist() - .&Apache::lontemplate::item_functionslist( - ''.&mt('Edit').'') - .&Apache::lontemplate::end_functionslist(); + $result.=&Apache::lonhtmlcommon::start_funclist() + .&Apache::lonhtmlcommon::add_item_funclist( + '' + .&mt('Edit').'') + .&Apache::lonhtmlcommon::end_funclist(); } return $result;