--- loncom/interface/loncommon.pm 2009/05/14 16:59:21 1.813
+++ loncom/interface/loncommon.pm 2009/05/15 09:33:22 1.815
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.813 2009/05/14 16:59:21 bisitz Exp $
+# $Id: loncommon.pm,v 1.815 2009/05/15 09:33:22 tempelho Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -4215,8 +4215,8 @@ Inputs:
in the title box that appears, this text
is not auto translated like the $title is
-=item * $notopbar, if true, keep the 'what is this' info but remove the
- navigational links
+=item * $no_nav_bar, if true, keep the 'what is this' info but remove the
+ navigational links
=item * $bgcolor, used to override the bgcolor on a webpage to a specific value
@@ -4242,7 +4242,7 @@ other decorations will be returned.
sub bodytag {
my ($title,$function,$addentries,$bodyonly,$domain,$forcereg,$customtitle,
- $notopbar,$bgcolor,$notitle,$no_inline_link,$args)=@_;
+ $no_nav_bar,$bgcolor,$notitle,$no_inline_link,$args)=@_;
if (!$args->{'no_auto_mt_title'}) { $title = &mt($title); }
@@ -4367,7 +4367,7 @@ ENDROLE
"| $titleinfo $dc_info | ".$roleinfo.
'
';
}
- if ($notopbar) {
+ if ($no_nav_bar) {
$bodytag .= $titletable;
} else {
$bodytag .= qq|$name ($role)
@@ -6467,7 +6467,7 @@ $args - additional optional args support
only_body -> is true will set &bodytag() onlybodytag
arg on
- no_nav_bar -> is true will set &bodytag() notopbar arg on
+ no_nav_bar -> is true will set &bodytag() no_nav_bar arg on
add_entries -> additional attributes to add to the
domain -> force to color decorate a page for a
specific domain
@@ -6799,7 +6799,7 @@ Returns either 'student','coordinator','
###############################################
sub get_users_function {
- my $function = 'student';
+ my $function = 'norole';
if ($env{'request.role'}=~/^(cc|in|ta|ep)/) {
$function='coordinator';
}