diff -Nur smeserver-xt_geoip-1.0.1.old/root/etc/e-smith/db/configuration/migrate/20xt_geoip smeserver-xt_geoip-1.0.1/root/etc/e-smith/db/configuration/migrate/20xt_geoip --- smeserver-xt_geoip-1.0.1.old/root/etc/e-smith/db/configuration/migrate/20xt_geoip 1969-12-31 19:00:00.000000000 -0500 +++ smeserver-xt_geoip-1.0.1/root/etc/e-smith/db/configuration/migrate/20xt_geoip 2019-09-21 12:16:20.521000000 -0400 @@ -0,0 +1,20 @@ +{ +my @addexclude = split(/,/,"imap,imaps,pop3,pop3s,pptpd,sshd,ftp,smtpd,ssmtpd"); +my $masq = $DB->get('masq') or return; + +my @exclude = split(/,/, $masq->prop('XtServices') || ''); +push @exclude, @addexclude; +# remove duplicates +undef %saw; +@exclude = grep(!$saw{$_}++, @exclude); +if ($#exclude > 0) + { + $masq->set_prop('XtServices', join(',', @exclude)); + + } +else + { + $masq->delete_prop('XtServices'); + } +} +