version 1.52, 2006/03/15 19:41:26
|
version 1.54, 2006/05/01 19:37:34
|
Line 100 sub handler {
|
Line 100 sub handler {
|
({href=>'/adm/whatsnew?command=chgthreshold&refpage='.$refpage, |
({href=>'/adm/whatsnew?command=chgthreshold&refpage='.$refpage, |
text=>"Change thresholds"}); |
text=>"Change thresholds"}); |
$r->print(&Apache::lonhtmlcommon::breadcrumbs |
$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'} ) { |
} elsif (($command eq 'chginterval') && $checkallowed{'versionchanges'} ) { |
&Apache::lonhtmlcommon::add_breadcrumb |
&Apache::lonhtmlcommon::add_breadcrumb |
({href=>'/adm/whatsnew?command=chginterval&refpage='.$refpage, |
({href=>'/adm/whatsnew?command=chginterval&refpage='.$refpage, |
text=>"Change interval"}); |
text=>"Change interval"}); |
$r->print(&Apache::lonhtmlcommon::breadcrumbs |
$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'}) { |
} elsif (($command eq 'chgdisc') && $checkallowed{'coursediscussion'}) { |
&Apache::lonhtmlcommon::add_breadcrumb |
&Apache::lonhtmlcommon::add_breadcrumb |
({href=>'/adm/whatsnew?command=chgdisc&refpage='.$refpage, |
({href=>'/adm/whatsnew?command=chgdisc&refpage='.$refpage, |
text=>"Change discussion display"}); |
text=>"Change discussion display"}); |
$r->print(&Apache::lonhtmlcommon::breadcrumbs |
$r->print(&Apache::lonhtmlcommon::breadcrumbs |
(undef,"What's New?",#'Course_Action_Items_Intervals' |
("What's New?",#'Course_Action_Items_Intervals' |
)); |
)); |
} elsif ($command eq 'courseinit') { |
} elsif ($command eq 'courseinit') { |
&Apache::lonhtmlcommon::add_breadcrumb |
&Apache::lonhtmlcommon::add_breadcrumb |
({href=>'/adm/whatsnew?command=courseinit&refpage='.$refpage, |
({href=>'/adm/whatsnew?command=courseinit&refpage='.$refpage, |
text=>"Course initialization preference"}); |
text=>"Course initialization preference"}); |
$r->print(&Apache::lonhtmlcommon::breadcrumbs |
$r->print(&Apache::lonhtmlcommon::breadcrumbs |
(undef,"What's New?",#'Course_Action_Items_Initialization' |
("What's New?",#'Course_Action_Items_Initialization' |
)); |
)); |
} else { |
} else { |
$r->print(&Apache::lonhtmlcommon::breadcrumbs |
$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); |
&display_main_box($r,$command,$refpage,\%checkallowed); |
Line 1029 sub getnormalmail {
|
Line 1029 sub getnormalmail {
|
if ($shortsubj eq '') { |
if ($shortsubj eq '') { |
$shortsubj = &mt('No subject'); |
$shortsubj = &mt('No subject'); |
} |
} |
$shortsubj = &Apache::lonnet::unescape($shortsubj); |
|
push(@{$newmsgs}, { |
push(@{$newmsgs}, { |
msgid => $msgid, |
msgid => $msgid, |
sendtime => $sendtime, |
sendtime => $sendtime, |
Line 1061 sub getcritmail {
|
Line 1060 sub getcritmail {
|
if ($shortsubj eq '') { |
if ($shortsubj eq '') { |
$shortsubj = &mt('No subject'); |
$shortsubj = &mt('No subject'); |
} |
} |
$shortsubj = &Apache::lonnet::unescape($shortsubj); |
|
push(@{$critmsgs}, { |
push(@{$critmsgs}, { |
msgid => $msgid, |
msgid => $msgid, |
sendtime => $sendtime, |
sendtime => $sendtime, |