--- loncom/interface/lonpreferences.pm 2007/05/08 17:23:10 1.102
+++ loncom/interface/lonpreferences.pm 2007/05/13 22:04:06 1.104
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Preferences
#
-# $Id: lonpreferences.pm,v 1.102 2007/05/08 17:23:10 raeburn Exp $
+# $Id: lonpreferences.pm,v 1.104 2007/05/13 22:04:06 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -578,9 +578,9 @@ sub msgforwardchanger {
foad => 'Forwarding Address(es)',
mnot => 'Message Notification Email Address(es)',
chg => 'Change',
- email => 'The e-mail address you entered',
+ email => 'The e-mail address entered in row ',
notv => 'is not a valid e-mail address',
- toen => "To enter multiple addresses, enter one address at a time, click 'Change' and then add the next one',
+ toen => "To enter multiple addresses, enter one address at a time, click 'Change' and then add the next one",
prme => 'Back to preferences menu',
);
my $forwardingHelp = Apache::loncommon::help_open_topic("Prefs_Forwarding",
@@ -595,28 +595,56 @@ sub msgforwardchanger {
my $jscript = qq|
|;
@@ -634,18 +662,28 @@ ENDMSG
my @sortforwards = sort (keys(%allnot));
my $output = &Apache::loncommon::start_data_table().
&Apache::loncommon::start_data_table_header_row().
+ '
'.
'
'.&mt('Action').'
'.
'
'.&mt('Notification address').'
'.
- &mt('Messages to forward').'
'.
- &mt('Excerpt retains HTML tags included in message').'
'.
+ &mt('Types of message to forward to this address').'
'.
+ &mt('Excerpt retains HTML tags in message').'
'.
&Apache::loncommon::end_data_table_header_row();
my $num = 0;
+ my $counter = 1;
foreach my $item (@sortforwards) {
$output .= &Apache::loncommon::start_data_table_row().
- '