[prev in list] [next in list] [prev in thread] [next in thread]
List: lon-capa-cvs
Subject: [LON-CAPA-cvs] cvs: loncom /homework inputtags.pm
From: raeburn <raeburn () source ! lon-capa ! org>
Date: 2012-06-12 22:02:24
Message-ID: cvsraeburn1339538544 () cvsserver
[Download RAW message or body]
raeburn Tue Jun 12 22:02:24 2012 EDT
Modified files:
/loncom/homework inputtags.pm
Log:
- Change wording in message displayed to student recording submission,
if "Show Problem Status" is no and "due date" is based on a time interval.
Index: loncom/homework/inputtags.pm
diff -u loncom/homework/inputtags.pm:1.303 loncom/homework/inputtags.pm:1.304
--- loncom/homework/inputtags.pm:1.303 Fri Jun 8 12:25:54 2012
+++ loncom/homework/inputtags.pm Tue Jun 12 22:02:24 2012
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# input definitons
#
-# $Id: inputtags.pm,v 1.303 2012/06/08 12:25:54 raeburn Exp $
+# $Id: inputtags.pm,v 1.304 2012/06/12 22:02:24 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1139,7 +1139,17 @@
if (&Apache::lonhomework::hide_problem_status()
&& $Apache::inputtags::status[-1] ne 'SHOW_ANSWER'
&& &hide_award($award)) {
- $message = &mt("Answer Submitted: Your final submission will be graded after the \
due date."); + $message = &mt("Answer Submitted: Your final submission will be \
graded after the due date."); + my @interval= \
&Apache::lonnet::EXT("resource.$part.interval"); + if ($interval[0] =~ /\d+/) \
{ + my $first_access=&Apache::lonnet::get_first_access($interval[1]);
+ if (defined($first_access)) {
+ my $due_date= &Apache::lonnet::EXT("resource.$part.duedate");
+ unless (($due_date) && ($due_date < $first_access + $interval[0])) { \
+ $message = &mt("Answer Submitted: Your final submission will be \
graded when the time limit is reached."); + }
+ }
+ }
$css_class=$possible_class{'no_grade'};
$button=1;
}
_______________________________________________
LON-CAPA-cvs mailing list
LON-CAPA-cvs@mail.lon-capa.org
http://mail.lon-capa.org/mailman/listinfo/lon-capa-cvs
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic