Add support for the Visible prop on minilists

4 years ago · 25be7c21b4
parent ed7d9791bd
commit 25be7c21b4
1 changed files with 10 additions and 0 deletions
--- a/root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto_ext/20InternalMinilist
+++ b/root/etc/e-smith/templates/var/service/qpsmtpd/config/badrcptto_ext/20InternalMinilist
@ -0,0 +1,10 @@
+{
+    $OUT .= '';
+    foreach my $list ( $a->get_all_by_prop( type => 'list' ){
+        next unless ( $list->prop('Visible') || '') =~ m/^(internal|none)$/i;
+
+        foreach my $domain ( $d->domains ){
+            $OUT .= $list->key . '@' . $domain->key . "\n";
+        }
+    }
+}