| 1 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/emailsettings.pm mezzanine_patched_e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/emailsettings.pm |
| 2 |
--- e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/emailsettings.pm 2007-01-26 12:47:51.000000000 -0700 |
| 3 |
+++ mezzanine_patched_e-smith-email-4.16.0/root/usr/lib/perl5/site_perl/esmith/FormMagick/Panel/emailsettings.pm 2007-01-26 12:47:31.000000000 -0700 |
| 4 |
@@ -259,23 +259,6 @@ |
| 5 |
$db->set_value('SMTPSmartHost', $q->param('SMTPSmartHost')); |
| 6 |
$db->set_value('DelegateMailServer', $q->param('DelegateMailServer')); |
| 7 |
$db->set_value('EmailUnknownUser', $EmailUnknownUser); |
| 8 |
- my $accounts = esmith::AccountsDB->open; |
| 9 |
- my $admin_email = $q->param('AdminEmail'); |
| 10 |
- my $admin = $accounts->get('admin'); |
| 11 |
- if ($admin_email) |
| 12 |
- { |
| 13 |
- $admin->merge_props( |
| 14 |
- EmailForward => 'forward', |
| 15 |
- ForwardAddress => $admin_email, |
| 16 |
- ); |
| 17 |
- } |
| 18 |
- else |
| 19 |
- { |
| 20 |
- $admin->merge_props( |
| 21 |
- EmailForward => 'local', |
| 22 |
- ForwardAddress => '', |
| 23 |
- ); |
| 24 |
- } |
| 25 |
|
| 26 |
my $proxy = $db->get('smtp-auth-proxy'); |
| 27 |
my %props = $proxy->props; |
Parent Directory
| 
Revision Log
| 
Revision Graph
