--- loncom/interface/lonpreferences.pm 2004/06/09 01:20:07 1.45
+++ loncom/interface/lonpreferences.pm 2004/11/02 00:17:24 1.49
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Preferences
#
-# $Id: lonpreferences.pm,v 1.45 2004/06/09 01:20:07 www Exp $
+# $Id: lonpreferences.pm,v 1.49 2004/11/02 00:17:24 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -868,8 +868,7 @@ sub handler {
}));
push (@Options,({ action => 'changemsgforward',
- linktext => 'Change Message Forwarding',
- text => 'and Notification Addresses',
+ linktext => 'Change Message Forwarding and Notification Addresses',
href => '/adm/preferences',
help => 'Prefs_Forwarding',
breadcrumb =>
@@ -940,6 +939,7 @@ sub handler {
push (@Options,({ action => 'changediscussions',
linktext => 'Change Discussion Display Preferences',
href => '/adm/preferences',
+ help => 'Change_Discussion_Display',
breadcrumb =>
{ href => '/adm/preferences?action=changediscussions',
text => 'Change Discussion Preferences'},
@@ -966,6 +966,7 @@ sub handler {
ENDHEADER
my $call = undef;
+ my $help = undef;
my $printmenu = 'yes';
foreach my $option (@Options) {
if ($option->{'action'} eq $ENV{'form.action'}) {
@@ -975,11 +976,12 @@ ENDHEADER
&Apache::lonhtmlcommon::add_breadcrumb
($option->{'breadcrumb'});
}
+ $help=$option->{'help'};
}
}
$r->print(&Apache::loncommon::bodytag('Change Preferences'));
$r->print(&Apache::lonhtmlcommon::breadcrumbs
- (undef,'Change Preferences'));
+ (undef,'Change Preferences',$help));
if (defined($call)) {
$call->($r);
}
@@ -1003,10 +1005,10 @@ ENDHEADER
$optiontext .=
''.
- $option->{'linktext'}.'';
+ &mt($option->{'linktext'}).'';
}
if (exists($option->{'text'})) {
- $optiontext .= ' '.$option->{'text'};
+ $optiontext .= ' '.&mt($option->{'text'});
}
if ($optiontext ne '') {
$optiontext = ''.$optiontext.'';