[LON-CAPA-cvs] cvs: loncom /auth lonroles.pm
bisitz
bisitz@source.lon-capa.org
Mon, 29 Jun 2009 12:43:45 -0000
bisitz Mon Jun 29 12:43:45 2009 EDT
Modified files:
/loncom/auth lonroles.pm
Log:
- Added breadcrumbs to "Switching Role" and "Problems during Course Initialization"
- Added line feed after error message headline
Index: loncom/auth/lonroles.pm
diff -u loncom/auth/lonroles.pm:1.227 loncom/auth/lonroles.pm:1.228
--- loncom/auth/lonroles.pm:1.227 Fri Jun 12 09:19:21 2009
+++ loncom/auth/lonroles.pm Mon Jun 29 12:43:45 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# User Roles Screen
#
-# $Id: lonroles.pm,v 1.227 2009/06/12 09:19:21 bisitz Exp $
+# $Id: lonroles.pm,v 1.228 2009/06/29 12:43:45 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -157,8 +157,13 @@
} else {
$navwindow.=&Apache::lonnavmaps::close();
}
+
+ # Breadcrumbs
+ my $brcrum = [{'href' => $url,
+ 'text' => 'Switching Role'},];
my $start_page = &Apache::loncommon::start_page('Switching Role',undef,
- {'redirect' => [1,$url],});
+ {'redirect' => [1,$url],
+ 'bread_crumbs' => $brcrum,});
my $end_page = &Apache::loncommon::end_page();
# Note to style police:
@@ -184,16 +189,25 @@
&Apache::loncommon::no_cache($r);
$r->send_http_header;
return OK if $r->header_only;
- $r->print(&Apache::loncommon::start_page('Problems during Course Initialization').
+ # Breadcrumbs
+ my $brcrum = [{'href' => $dest,
+ 'text' => 'Problems during Course Initialization'},];
+ $r->print(&Apache::loncommon::start_page('Problems during Course Initialization',
+ undef,
+ {'bread_crumbs' => $brcrum,})
+ );
+ $r->print(
'<script type="text/javascript">'.
'// <![CDATA['.
&Apache::lonmenu::rawconfig().
'// ]]>'.
'</script>'.
'<p class="LC_error">'.&mt('The following problems occurred:').
+ '<br />'.
$error.
- '</p><br /><a href="'.$dest.'">'.&mt('Continue').'</a>'.
- &Apache::loncommon::end_page());
+ '</p><br /><a href="'.$dest.'">'.&mt('Continue').'</a>'
+ );
+ $r->print(&Apache::loncommon::end_page());
}
sub handler {