version 1.206, 2013/07/04 16:35:12
|
version 1.209, 2013/07/24 18:21:39
|
Line 876 sub msgforwardchanger {
|
Line 876 sub msgforwardchanger {
|
foad => 'Forward to account(s)', |
foad => 'Forward to account(s)', |
fwdm => 'Forward messages to other account(s) in LON-CAPA', |
fwdm => 'Forward messages to other account(s) in LON-CAPA', |
noti => 'E-mail notification of LON-CAPA messages', |
noti => 'E-mail notification of LON-CAPA messages', |
foad_exmpl => 'e.g. <tt>userA:domain1,userB:domain2,...</tt>', |
|
mnot => 'E-mail address(es) which should be notified about new LON-CAPA messages', |
mnot => 'E-mail address(es) which should be notified about new LON-CAPA messages', |
mnot_exmpl => 'e.g. <tt>joe@doe.com</tt>', |
|
chg => 'Save', |
chg => 'Save', |
email => 'The e-mail address entered in row ', |
email => 'The e-mail address entered in row ', |
notv => 'is not a valid e-mail address', |
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', |
prme => 'Back', |
); |
); |
|
$lt{'foad_exmpl'} = &mt('e.g. [_1]userA:domain1,userB:domain2,...[_2]','<tt>','</tt>'); |
|
$lt{'mnot_exmpl'} = &mt('e.g. [_1]joe@doe.com[_2]','<tt>','</tt>'); |
Apache::lonhtmlcommon::add_breadcrumb( |
Apache::lonhtmlcommon::add_breadcrumb( |
{ href => '/adm/preferences?action=changemsgforward', |
{ href => '/adm/preferences?action=changemsgforward', |
text => 'Messages & Notifications'}); |
text => 'Messages & Notifications'}); |
Line 1228 sub colorschanger {
|
Line 1228 sub colorschanger {
|
'); |
'); |
$r->print(<<ENDCOL); |
$r->print(<<ENDCOL); |
|
|
<form name="parmform"> |
<form name="parmform" action=""> |
<input type="hidden" name="pres_marker" /> |
<input type="hidden" name="pres_marker" /> |
<input type="hidden" name="pres_type" /> |
<input type="hidden" name="pres_type" /> |
<input type="hidden" name="pres_value" /> |
<input type="hidden" name="pres_value" /> |
Line 1458 sub client_form {
|
Line 1458 sub client_form {
|
'changepass' => 'Save', |
'changepass' => 'Save', |
); |
); |
|
|
my $output = '<form name="client">' |
my $output = '<form name="client" action="">' |
.&Apache::lonhtmlcommon::start_pick_box(); |
.&Apache::lonhtmlcommon::start_pick_box(); |
if ($caller eq 'reset_by_email') { |
if ($caller eq 'reset_by_email') { |
$output .= &Apache::lonhtmlcommon::row_title( |
$output .= &Apache::lonhtmlcommon::row_title( |
Line 1819 sub verify_and_change_discussion {
|
Line 1819 sub verify_and_change_discussion {
|
if (defined($env{'form.discmark'}) ) { |
if (defined($env{'form.discmark'}) ) { |
my $newmark = $env{'form.newmark'}; |
my $newmark = $env{'form.newmark'}; |
if ($newmark eq 'ondisp') { |
if ($newmark eq 'ondisp') { |
$message.=&Apache::lonhtmlcommon::confirm_success(&mt('In discussions: new posts will be cease to be identified as "NEW" after display.')).'<br />'; |
$message.=&Apache::lonhtmlcommon::confirm_success(&mt('In discussions: new posts will cease to be identified as "NEW" after display.')).'<br />'; |
&Apache::lonnet::put('environment',{'discmarkread' => $newmark}); |
&Apache::lonnet::put('environment',{'discmarkread' => $newmark}); |
&Apache::lonnet::appenv({'environment.discmarkread' => $newmark}); |
&Apache::lonnet::appenv({'environment.discmarkread' => $newmark}); |
} else { |
} else { |