--- loncom/homework/inputtags.pm 2003/11/25 23:04:58 1.124 +++ loncom/homework/inputtags.pm 2004/01/29 21:31:07 1.128 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # input definitons # -# $Id: inputtags.pm,v 1.124 2003/11/25 23:04:58 www Exp $ +# $Id: inputtags.pm,v 1.128 2004/01/29 21:31:07 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -24,8 +24,6 @@ # /home/httpd/html/adm/gpl.txt # # http://www.lon-capa.org/ -# -# 2/19 Guy package Apache::inputtags; use HTML::Entities(); @@ -480,7 +478,7 @@ sub decideoutput { } if (lc($Apache::lonhomework::problemstatus) eq 'no' && $Apache::inputtags::status[-1] ne 'SHOW_ANSWER') { - $message = &mt("Answer Submitted"); + $message = &mt("Answer Submitted: Your final submission will be graded after the due date."); $bgcolor=$possiblecolors{'correct'}; $button=1; } @@ -679,13 +677,21 @@ sub gradestatus { $trystr = '\vskip 0 mm '; } } else { - $trystr = "".&mt('Tries')." $tries/$maxtries"; + $trystr = "".&mt('Tries')." $tries"; + if($ENV{'request.state'} ne 'construct') { + $trystr.="/$maxtries"; + } else { + if (defined($Apache::inputtags::params{'maxtries'})) { + $trystr.="/".$Apache::inputtags::params{'maxtries'}; + } + } + $trystr.=""; } } if ( $status eq 'SHOW_ANSWER' || $status eq 'CANNOT_ANSWER') {$showbutton = 0;} if ( $showbutton ) { if ($target ne 'tex') { - $button = '
'; + $button = ''; } } if ($Apache::lonhomework::history{"resource.$id.afterduedate"}) { @@ -704,7 +710,7 @@ sub gradestatus { if ($target eq 'tex') { return $button.' \vskip 0 mm '.$output.' '; } else { - return $button.''.$output.'
'; + return ''.$output.'
'.$button.'
'; } } }