--- loncom/interface/lonnavdisplay.pm 2021/03/04 14:00:19 1.22.4.9.4.2
+++ loncom/interface/lonnavdisplay.pm 2018/12/30 15:58:20 1.37
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Navigate Maps Display Handler
#
-# $Id: lonnavdisplay.pm,v 1.22.4.9.4.2 2021/03/04 14:00:19 raeburn Exp $
+# $Id: lonnavdisplay.pm,v 1.37 2018/12/30 15:58:20 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -39,6 +39,7 @@ use Apache::lonnet;
use Apache::lonlocal;
use Apache::londocs();
use Apache::lonuserstate;
+use LONCAPA::ltiutils;
sub handler {
my $r = shift;
@@ -54,7 +55,7 @@ sub real_handler {
return OK;
}
- # Check for critical messages and redirect if present.
+ # Check for critical messages and redirect if present.
my ($redirect,$url) = &Apache::loncommon::critical_redirect(300,'contents');
if ($redirect) {
&Apache::loncommon::content_type($r,'text/html');
@@ -87,7 +88,7 @@ sub real_handler {
my $preamble = '
'.
'
'.
&mt('Your course session is being updated because of recent changes by course personnel.').
- ' '.&mt('Please be patient').'.
'.
+ ' '.&mt('Please be patient.').'
'.
'';
$closure = <
@@ -100,7 +101,7 @@ ENDCLOSE
&Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,&mt('Updating course'));
$r->rflush();
my ($furl,$ferr) = &Apache::lonuserstate::readmap("$cdom/$cnum",\%prog_state,$r);
- &Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,&mt('Finished!'));
+ &Apache::lonhtmlcommon::Update_PrgWin($r,\%prog_state,&mt('Finished'));
if ($ferr) {
&Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
$r->print($closure.&Apache::loncommon::end_page());
@@ -111,6 +112,34 @@ ENDCLOSE
}
}
+ my $course_type = &Apache::loncommon::course_type();
+ if (($course_type eq 'Placement') && (!$env{'request.role.adv'})) {
+ my $furl = &Apache::lonpageflip::first_accessible_resource();
+ if ($result eq 'update') {
+ &Apache::lonhtmlcommon::Close_PrgWin($r,\%prog_state);
+ $r->print($closure.&Apache::loncommon::end_page());
+ return OK;
+ } else {
+ &Apache::loncommon::content_type($r,'text/html');
+ $r->header_out(Location => $furl);
+ return REDIRECT;
+ }
+ }
+
+ if ($env{'request.lti.login'}) {
+ if ($env{'request.lti.uri'} ne '') {
+ my $cid = $env{'request.course.id'};
+ my $cnum = $env{'course.'.$cid.'.num'};
+ my $cdom = $env{'course.'.$cid.'.domain'};
+ my ($scope,$url) = &LONCAPA::ltiutils::lti_provider_scope($env{'request.lti.uri'},$cdom,$cnum);
+ if (($scope eq 'map') || ($scope eq 'resource')) {
+ &Apache::loncommon::content_type($r,'text/html');
+ $r->header_out(Location => $url);
+ return REDIRECT;
+ }
+ }
+ }
+
# Create the nav map
my $navmap = Apache::lonnavmaps::navmap->new();
@@ -368,6 +397,7 @@ sub startContentScreen {
$r->print(''.&mt('Supplemental Content').'');
}
$r->print(' '.&mt('Content Search').' '."\n");
+ $r->print(' '.&mt('Content Index').' '."\n");
$r->print("\n".''."\n");
$r->print('