[LON-CAPA-cvs] cvs: loncom /interface loncoursegroups.pm londocs.pm londropadd.pm lonmsgdisplay.pm lonnotify.pm lonparmset.pm lonpreferences.pm lonsearchcat.pm lonstatistics.pm lontrackstudent.pm lonwhatsnew.pm
albertel
lon-capa-cvs@mail.lon-capa.org
Mon, 01 May 2006 19:37:34 -0000
This is a MIME encoded message
--albertel1146512254
Content-Type: text/plain
albertel Mon May 1 15:37:34 2006 EDT
Modified files:
/loncom/interface loncoursegroups.pm londocs.pm londropadd.pm
lonmsgdisplay.pm lonnotify.pm lonparmset.pm
lonpreferences.pm lonsearchcat.pm
lonstatistics.pm lontrackstudent.pm
lonwhatsnew.pm
Log:
- upadte breadcrumbs calls
--albertel1146512254
Content-Type: text/plain
Content-Disposition: attachment; filename="albertel-20060501153734.txt"
Index: loncom/interface/loncoursegroups.pm
diff -u loncom/interface/loncoursegroups.pm:1.13 loncom/interface/loncoursegroups.pm:1.14
--- loncom/interface/loncoursegroups.pm:1.13 Mon Apr 10 15:59:53 2006
+++ loncom/interface/loncoursegroups.pm Mon May 1 15:37:33 2006
@@ -106,8 +106,7 @@
&Apache::lonhtmlcommon::add_breadcrumb
({href=>"/adm/coursegroups",
text=>"Course Groups",});
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Course Groups'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Course Groups'));
&display_groups($r,$cdom,$cnum,$function,$tabcol,$functions,$idx,
$view_permission,$manage_permission,$action,$rowColor1,
$rowColor2);
@@ -772,7 +771,7 @@
&Apache::lonhtmlcommon::add_breadcrumb(
{text=>"$trail{$action}{$state}"});
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Course Groups Manager'));
+ ('Course Groups Manager'));
&display_control($r,$cdom,$cnum,$tabcol,$action,$state,$page,
\%sectioncount,$groupname,$description,$functions,
\@tools,\%toolprivs,\%fixedprivs,$startdate,$enddate,
@@ -797,7 +796,7 @@
&Apache::lonhtmlcommon::add_breadcrumb(
{text=>"View groups"});
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Course Groups Manager'));
+ ('Course Groups Manager'));
&display_groups($r,$cdom,$cnum,$function,$tabcol,$functions,$idx,
$view_permission,$manage_permission,$action,
$rowColor1,$rowColor2);
Index: loncom/interface/londocs.pm
diff -u loncom/interface/londocs.pm:1.225 loncom/interface/londocs.pm:1.226
--- loncom/interface/londocs.pm:1.225 Mon Apr 10 15:59:53 2006
+++ loncom/interface/londocs.pm Mon May 1 15:37:33 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Documents
#
-# $Id: londocs.pm,v 1.225 2006/04/10 19:59:53 albertel Exp $
+# $Id: londocs.pm,v 1.226 2006/05/01 19:37:33 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -970,8 +970,7 @@
}
- return &Apache::lonhtmlcommon::breadcrumbs(undef,undef,undef,undef,undef,
- 0,'nohelp');
+ return &Apache::lonhtmlcommon::breadcrumbs(undef,undef,0,'nohelp');
}
sub editor {
Index: loncom/interface/londropadd.pm
diff -u loncom/interface/londropadd.pm:1.140 loncom/interface/londropadd.pm:1.141
--- loncom/interface/londropadd.pm:1.140 Wed Apr 26 10:52:22 2006
+++ loncom/interface/londropadd.pm Mon May 1 15:37:33 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to drop and add students in courses
#
-# $Id: londropadd.pm,v 1.140 2006/04/26 14:52:22 albertel Exp $
+# $Id: londropadd.pm,v 1.141 2006/05/01 19:37:33 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -2388,16 +2388,15 @@
#
# Main switch on form.action and form.state, as appropriate
if (! exists($env{'form.action'})) {
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Enrollment Manager'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Enrollment Manager'));
&print_main_menu($r,$enrl_permission,$view_permission,$grp_manage_permission,
$grp_view_permission);
} elsif ($env{'form.action'} eq 'upload' && $enrl_permission) {
&Apache::lonhtmlcommon::add_breadcrumb
({href=>'/adm/dropadd?action=upload&state=',
text=>"Upload Classlist"});
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Upload Classlist','Course_Create_Class_List'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Upload Classlist',
+ 'Course_Create_Class_List'));
if (! exists($env{'form.state'})) {
&print_first_courselist_upload_form($r);
} elsif ($env{'form.state'} eq 'got_file') {
@@ -2415,8 +2414,8 @@
&Apache::lonhtmlcommon::add_breadcrumb
({href=>'/adm/dropadd?action=drop',
text=>"Drop Students"});
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Drop Students','Course_Drop_Student'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Drop Students',
+ 'Course_Drop_Student'));
if (! exists($env{'form.state'})) {
&print_drop_menu($r);
} elsif ($env{'form.state'} eq 'done') {
@@ -2428,8 +2427,8 @@
&Apache::lonhtmlcommon::add_breadcrumb
({href=>'/adm/dropadd?action=enrollstudent',
text=>"Enroll Student"});
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Enroll Student','Course_Add_Student'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Enroll Student',
+ 'Course_Add_Student'));
if (! exists($env{'form.state'})) {
&get_student_username_domain_form($r);
} elsif ($env{'form.state'} eq 'gotusername') {
@@ -2443,8 +2442,8 @@
&Apache::lonhtmlcommon::add_breadcrumb
({href=>'/adm/dropadd?action=classlist',
text=>"View Classlist"});
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'View Classlist','Course_View_Class_List'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('View Classlist',
+ 'Course_View_Class_List'));
if (! exists($env{'form.state'})) {
&print_html_classlist($r,undef);
} elsif ($env{'form.state'} eq 'csv') {
@@ -2458,8 +2457,8 @@
&Apache::lonhtmlcommon::add_breadcrumb
({href=>'/adm/dropadd?action=modifystudent',
text=>"Modify Student Data"});
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Modify Student Data','Course_Modify_Student_Data'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Modify Student Data',
+ 'Course_Modify_Student_Data'));
if (! exists($env{'form.state'})) {
&print_html_classlist($r);
} elsif ($env{'form.state'} eq 'selected') {
@@ -2474,8 +2473,7 @@
&Apache::lonnet::logthis("Undetermined state in londropadd.pm. ".
"form.action = ".$env{'form.action'}.
"Someone should fix this.");
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Enrollment Manager'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Enrollment Manager'));
&print_main_menu($r,$enrl_permission,$view_permission);
}
#
Index: loncom/interface/lonmsgdisplay.pm
diff -u loncom/interface/lonmsgdisplay.pm:1.21 loncom/interface/lonmsgdisplay.pm:1.22
--- loncom/interface/lonmsgdisplay.pm:1.21 Mon May 1 12:17:56 2006
+++ loncom/interface/lonmsgdisplay.pm Mon May 1 15:37:33 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines for messaging display
#
-# $Id: lonmsgdisplay.pm,v 1.21 2006/05/01 16:17:56 albertel Exp $
+# $Id: lonmsgdisplay.pm,v 1.22 2006/05/01 19:37:33 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1654,7 +1654,7 @@
$r->print(&Apache::loncommon::start_page('Communication and Messages',
$extra));
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,($title?$title:'Communication and Messages')));
+ (($title?$title:'Communication and Messages')));
}
Index: loncom/interface/lonnotify.pm
diff -u loncom/interface/lonnotify.pm:1.17 loncom/interface/lonnotify.pm:1.18
--- loncom/interface/lonnotify.pm:1.17 Sun Apr 23 00:04:38 2006
+++ loncom/interface/lonnotify.pm Mon May 1 15:37:33 2006
@@ -109,7 +109,7 @@
{'add_entries' =>
{'onload' => $loadcode,},});
my $breadcrumbs =
- &Apache::lonhtmlcommon::breadcrumbs(undef,$bread_title,
+ &Apache::lonhtmlcommon::breadcrumbs($bread_title,
'Broadcast_system_email');
my $output = <<"ENDONE";
$start_page
Index: loncom/interface/lonparmset.pm
diff -u loncom/interface/lonparmset.pm:1.297 loncom/interface/lonparmset.pm:1.298
--- loncom/interface/lonparmset.pm:1.297 Mon May 1 10:59:38 2006
+++ loncom/interface/lonparmset.pm Mon May 1 15:37:33 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.297 2006/05/01 14:59:38 raeburn Exp $
+# $Id: lonparmset.pm,v 1.298 2006/05/01 19:37:33 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -649,8 +649,7 @@
&page_js(),
{'add_entries' => \%loaditems,});
my $breadcrumbs =
- &Apache::lonhtmlcommon::breadcrumbs(undef,
- 'Table Mode Parameter Setting');
+ &Apache::lonhtmlcommon::breadcrumbs('Table Mode Parameter Setting');
$r->print(<<ENDHEAD);
$start_page
$breadcrumbs
@@ -1984,8 +1983,8 @@
my $r=shift;
my $setoutput='';
- my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs(undef,
- 'Edit Course Environment');
+ my $breadcrumbs =
+ &Apache::lonhtmlcommon::breadcrumbs('Edit Course Environment');
my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'};
my $crs = $env{'course.'.$env{'request.course.id'}.'.num'};
@@ -2647,7 +2646,7 @@
my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'};
my $crs = $env{'course.'.$env{'request.course.id'}.'.num'};
my $start_page = &Apache::loncommon::start_page('Set Parameters');
- my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs(undef,'Overview');
+ my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs('Overview');
$r->print(<<ENDOVER);
$start_page
$breadcrumbs
@@ -2801,7 +2800,7 @@
my $crs = $env{'course.'.$env{'request.course.id'}.'.num'};
my $start_page=&Apache::loncommon::start_page('Modify Parameters');
- my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs(undef,'Overview');
+ my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs('Overview');
$r->print(<<ENDOVER);
$start_page
$breadcrumbs
@@ -3091,8 +3090,7 @@
my $put_result;
$r->print(&Apache::loncommon::start_page('Restrict Metadata'));
- $r->print(&Apache::lonhtmlcommon::breadcrumbs(undef,
- 'Restrict Metadata'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Restrict Metadata'));
my $dom = $env{'course.'.$env{'request.course.id'}.'.domain'};
my $crs = $env{'course.'.$env{'request.course.id'}.'.num'};
my $key_base = $env{'course.'.$env{'request.course.id'}.'.'};
@@ -3149,7 +3147,7 @@
my $start_page =
&Apache::loncommon::start_page('Parameter Setting Default Actions');
- my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs(undef,'Defaults');
+ my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs('Defaults');
$r->print(<<ENDDEFHEAD);
$start_page
$breadcrumbs
@@ -3500,8 +3498,7 @@
} elsif (! exists($env{'form.action'})) {
$r->print(&header());
- $r->print(&Apache::lonhtmlcommon::breadcrumbs(undef,
- 'Parameter Manager'));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Parameter Manager'));
&print_main_menu($r,$parm_permission);
} elsif ($env{'form.action'} eq 'crsenv' && $parm_permission) {
&Apache::lonhtmlcommon::add_breadcrumb({href=>'/adm/parmset?action=crsenv',
Index: loncom/interface/lonpreferences.pm
diff -u loncom/interface/lonpreferences.pm:1.80 loncom/interface/lonpreferences.pm:1.81
--- loncom/interface/lonpreferences.pm:1.80 Mon Apr 10 14:59:30 2006
+++ loncom/interface/lonpreferences.pm Mon May 1 15:37:34 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Preferences
#
-# $Id: lonpreferences.pm,v 1.80 2006/04/10 18:59:30 albertel Exp $
+# $Id: lonpreferences.pm,v 1.81 2006/05/01 19:37:34 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1246,8 +1246,7 @@
$help=$option->{'help'};
}
}
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Change Preferences',$help));
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Change Preferences',$help));
my $error;
if (defined($call)) {
$error = $call->($r);
Index: loncom/interface/lonsearchcat.pm
diff -u loncom/interface/lonsearchcat.pm:1.262 loncom/interface/lonsearchcat.pm:1.263
--- loncom/interface/lonsearchcat.pm:1.262 Tue Apr 11 15:53:11 2006
+++ loncom/interface/lonsearchcat.pm Mon May 1 15:37:34 2006
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Search Catalog
#
-# $Id: lonsearchcat.pm,v 1.262 2006/04/11 19:53:11 albertel Exp $
+# $Id: lonsearchcat.pm,v 1.263 2006/05/01 19:37:34 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -660,9 +660,8 @@
my ($r,$closebutton,$hidden_fields) = @_;
my $result = ($env{'form.catalogmode'} ne 'groupsearch');
my $bread_crumb =
- &Apache::lonhtmlcommon::breadcrumbs(undef,'Searching','Search_Basic',
- undef,undef,
- $env{'form.catalogmode'} ne 'groupsearch');
+ &Apache::lonhtmlcommon::breadcrumbs('Searching','Search_Basic',
+ $env{'form.catalogmode'} ne 'groupsearch');
my $scrout = &Apache::loncommon::start_page('Search').$bread_crumb;
if (&Apache::lonnet::allowed('bre',$env{'request.role.domain'})) {
# Define interface components
@@ -794,10 +793,8 @@
sub print_advanced_search_form{
my ($r,$closebutton,$hidden_fields) = @_;
my $bread_crumb =
- &Apache::lonhtmlcommon::breadcrumbs(undef,'Searching',
- 'Search_Advanced',
- undef,undef,
- $env{'form.catalogmode'} ne 'groupsearch');
+ &Apache::lonhtmlcommon::breadcrumbs('Searching','Search_Advanced',
+ $env{'form.catalogmode'} ne 'groupsearch');
my %lt=&Apache::lonlocal::texthash('srch' => 'Search',
'reset' => 'Reset',
'help' => 'Help');
@@ -2109,9 +2106,8 @@
my $start_page = &Apache::loncommon::start_page('Results',$js,
{'only_body' => 1});
my $breadcrumbs=
- &Apache::lonhtmlcommon::breadcrumbs
- (undef,'Searching','Searching',undef,undef,
- $env{'form.catalogmode'} ne 'groupsearch');
+ &Apache::lonhtmlcommon::breadcrumbs('Searching','Searching',
+ $env{'form.catalogmode'} ne 'groupsearch');
my $result = <<END;
$start_page
@@ -2339,9 +2335,9 @@
#
my $start_page = &Apache::loncommon::start_page('Search Status',undef,
{'only_body' => 1});
- my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs
- (undef,'Searching','Searching',undef,undef,
- $env{'form.catalogmode'} ne 'groupsearch');
+ my $breadcrumbs =
+ &Apache::lonhtmlcommon::breadcrumbs('Searching','Searching',
+ $env{'form.catalogmode'} ne 'groupsearch');
$r->print(<<END);
$start_page
$breadcrumbs
Index: loncom/interface/lonstatistics.pm
diff -u loncom/interface/lonstatistics.pm:1.131 loncom/interface/lonstatistics.pm:1.132
--- loncom/interface/lonstatistics.pm:1.131 Mon May 1 12:11:25 2006
+++ loncom/interface/lonstatistics.pm Mon May 1 15:37:34 2006
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lonstatistics.pm,v 1.131 2006/05/01 16:11:25 albertel Exp $
+# $Id: lonstatistics.pm,v 1.132 2006/05/01 19:37:34 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -922,7 +922,7 @@
#
# Output some of the standard interface components
my $Str;
- $Str .= &Apache::lonhtmlcommon::breadcrumbs(undef,'Select One Student');
+ $Str .= &Apache::lonhtmlcommon::breadcrumbs('Select One Student');
$Str .= '<p><table cellspacing="5">'."\n";
$Str .= '<tr>';
$Str .= '<th align="center"><b>'.&mt('Sections').'</b></th>';
@@ -1163,8 +1163,7 @@
bug=>'Statistics and Charts'});
if (! exists($env{'form.reportSelected'}) ||
$env{'form.reportSelected'} eq '') {
- $r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,&mt('Statistics Main Page')).
+ $r->print(&Apache::lonhtmlcommon::breadcrumbs('Statistics Main Page').
&CreateMainMenu());
} else {
#
Index: loncom/interface/lontrackstudent.pm
diff -u loncom/interface/lontrackstudent.pm:1.18 loncom/interface/lontrackstudent.pm:1.19
--- loncom/interface/lontrackstudent.pm:1.18 Wed Mar 15 14:41:26 2006
+++ loncom/interface/lontrackstudent.pm Mon May 1 15:37:34 2006
@@ -1,6 +1,6 @@
# The LearningOnline Network with CAPA
#
-# $Id: lontrackstudent.pm,v 1.18 2006/03/15 19:41:26 albertel Exp $
+# $Id: lontrackstudent.pm,v 1.19 2006/05/01 19:37:34 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -511,7 +511,7 @@
#
# Give the LON-CAPA page header
$r->print(&Apache::loncommon::start_page('Student Activity',&styles()).
- &Apache::lonhtmlcommon::breadcrumbs(undef,'Student Activity'));
+ &Apache::lonhtmlcommon::breadcrumbs('Student Activity'));
$r->rflush();
#
# Begin form output
Index: loncom/interface/lonwhatsnew.pm
diff -u loncom/interface/lonwhatsnew.pm:1.53 loncom/interface/lonwhatsnew.pm:1.54
--- loncom/interface/lonwhatsnew.pm:1.53 Sun Apr 23 00:04:38 2006
+++ loncom/interface/lonwhatsnew.pm Mon May 1 15:37:34 2006
@@ -1,5 +1,5 @@
#
-# $Id: lonwhatsnew.pm,v 1.53 2006/04/23 04:04:38 albertel Exp $
+# $Id: lonwhatsnew.pm,v 1.54 2006/05/01 19:37:34 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -100,32 +100,32 @@
({href=>'/adm/whatsnew?command=chgthreshold&refpage='.$refpage,
text=>"Change thresholds"});
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,"What's New?",#'Course_Action_Items_Thresholds'
+ ("What's New?",#'Course_Action_Items_Thresholds'
));
} elsif (($command eq 'chginterval') && $checkallowed{'versionchanges'} ) {
&Apache::lonhtmlcommon::add_breadcrumb
({href=>'/adm/whatsnew?command=chginterval&refpage='.$refpage,
text=>"Change interval"});
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,"What's New?",#'Course_Action_Items_Intervals'
+ ("What's New?",#'Course_Action_Items_Intervals'
));
} elsif (($command eq 'chgdisc') && $checkallowed{'coursediscussion'}) {
&Apache::lonhtmlcommon::add_breadcrumb
({href=>'/adm/whatsnew?command=chgdisc&refpage='.$refpage,
text=>"Change discussion display"});
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,"What's New?",#'Course_Action_Items_Intervals'
+ ("What's New?",#'Course_Action_Items_Intervals'
));
} elsif ($command eq 'courseinit') {
&Apache::lonhtmlcommon::add_breadcrumb
({href=>'/adm/whatsnew?command=courseinit&refpage='.$refpage,
text=>"Course initialization preference"});
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,"What's New?",#'Course_Action_Items_Initialization'
+ ("What's New?",#'Course_Action_Items_Initialization'
));
} else {
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,"What's New?",#'Course_Action_Items_Display'
+ ("What's New?",#'Course_Action_Items_Display'
));
}
&display_main_box($r,$command,$refpage,\%checkallowed);
--albertel1146512254--