1 |
unnilennium |
1.1 |
diff -Nur e-smith-proxy-5.6.0.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/proxy.pm e-smith-proxy-5.6.0/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/proxy.pm |
2 |
|
|
--- e-smith-proxy-5.6.0.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/proxy.pm 2013-02-13 10:22:01.000000000 -0500 |
3 |
|
|
+++ e-smith-proxy-5.6.0/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/proxy.pm 2017-04-12 17:21:01.414000000 -0400 |
4 |
|
|
@@ -74,7 +74,7 @@ |
5 |
|
|
sub get_smtp_proxy_status |
6 |
|
|
{ |
7 |
|
|
my $self = shift; |
8 |
|
|
- return $self->{db}->get_prop('smtpd', 'Proxy'); |
9 |
|
|
+ return $self->{db}->get_prop('qpsmtpd', 'Proxy'); |
10 |
|
|
} |
11 |
|
|
|
12 |
|
|
=head2 change_settings |
13 |
|
|
@@ -95,7 +95,7 @@ |
14 |
|
|
or return $self->error('ERR_NO_SQUID_REC'); |
15 |
|
|
# smtpd is allowed to not exist, as the relevant packages may not be |
16 |
|
|
# installed. |
17 |
|
|
- my $smtpd = $self->{db}->get('smtpd') || undef; |
18 |
|
|
+ my $smtpd = $self->{db}->get('qpsmtpd') || undef; |
19 |
|
|
|
20 |
|
|
$squid->set_prop('status', $http_proxy_status); |
21 |
|
|
$smtpd->set_prop('Proxy', $smtp_proxy_status) if $smtpd; |