[LON-CAPA-cvs] cvs: rat / lonpage.pm
raeburn
raeburn at source.lon-capa.org
Mon May 30 00:50:39 EDT 2016
raeburn Mon May 30 04:50:39 2016 EDT
Modified files:
/rat lonpage.pm
Log:
- Remove duplicated code included in rev. 1.114.
Index: rat/lonpage.pm
diff -u rat/lonpage.pm:1.114 rat/lonpage.pm:1.115
--- rat/lonpage.pm:1.114 Mon May 30 03:02:37 2016
+++ rat/lonpage.pm Mon May 30 04:50:39 2016
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Page Handler
#
-# $Id: lonpage.pm,v 1.114 2016/05/30 03:02:37 raeburn Exp $
+# $Id: lonpage.pm,v 1.115 2016/05/30 04:50:39 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -498,32 +498,25 @@
my @interval=&Apache::lonnet::EXT("resource.0.interval",$symb);
if (@interval > 1) {
my $first_access;
- if ($first_access > 0) {
- if ($interval[1] eq 'map') {
- my $ignorecache;
- if ($env{'form.'.$prefix.'markaccess'} eq 'yes') {
- $ignorecache = 1;
- }
- $first_access=&Apache::lonnet::get_first_access($interval[1],undef,$pagesymb,$ignorecache);
- if (($first_access) && (!$pagefirstaccess)) {
- $pagefirstaccess = $first_access;
- }
- } else {
- $first_access=&Apache::lonnet::get_first_access($interval[1],$symb);
+ if ($interval[1] eq 'map') {
+ my $ignorecache;
+ if ($env{'form.'.$prefix.'markaccess'} eq 'yes') {
+ $ignorecache = 1;
}
- if ($first_access > 0) {
- my ($timelimit) = ($interval[0] =~ /^(\d+)/);
- if ($timelimit) {
- my $timeremains = $timelimit + $first_access - $now;
- if ($timeremains > 0) {
- $timerhastime = $timeremains;
- }
- }
+ $first_access=&Apache::lonnet::get_first_access($interval[1],undef,$pagesymb,$ignorecache);
+ if (($first_access) && (!$pagefirstaccess)) {
+ $pagefirstaccess = $first_access;
}
+ } else {
+ $first_access=&Apache::lonnet::get_first_access($interval[1],$symb);
+ }
+ if ($first_access > 0) {
my ($timelimit) = ($interval[0] =~ /^(\d+)/);
- my $timeremains = $first_access+$timelimit - $now;
- if ($timeremains > 0) {
- $timerhastime = $timeremains;
+ if ($timelimit) {
+ my $timeremains = $timelimit + $first_access - $now;
+ if ($timeremains > 0) {
+ $timerhastime = $timeremains;
+ }
}
}
}
More information about the LON-CAPA-cvs
mailing list