diff -Nur smeserver-wbl-0.3.0.old/createlinks smeserver-wbl-0.3.0/createlinks
--- smeserver-wbl-0.3.0.old/createlinks	2017-05-06 00:23:58.252000000 -0400
+++ smeserver-wbl-0.3.0/createlinks	2017-05-06 00:30:55.133000000 -0400
@@ -14,6 +14,19 @@
 templates2events("/var/service/qpsmtpd/config/whitelisthosts", "email-update");
 templates2events("/var/service/qpsmtpd/config/whitelistsenders", "email-update");
 
+# own event
+my $wbl = "smeserver-wbl-update";
+templates2events("/var/qmail/control/badmailfrom", "$wbl");
+templates2events("/var/service/qpsmtpd/config/badmailfrom", "$wbl");
+templates2events("/var/service/qpsmtpd/config/badhelo", "$wbl");
+templates2events("/var/service/qpsmtpd/config/whitelisthelo", "$wbl");
+templates2events("/var/service/qpsmtpd/config/whitelisthosts", "$wbl");
+templates2events("/var/service/qpsmtpd/config/whitelistsenders", "$wbl");
+templates2events("/etc/mail/spamassassin/local.cf", "$wbl");
+
+safe_symlink("restart", "root/etc/e-smith/events/$wbl/services2adjust/clamd");
+
+
 ##Symlink qpsmtpd whitlist_soft plugin for external connections
 
 safe_symlink("../../plugins/11whitelist", 
diff -Nur smeserver-wbl-0.3.0.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/wbl.pm smeserver-wbl-0.3.0/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/wbl.pm
--- smeserver-wbl-0.3.0.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/wbl.pm	2017-05-06 00:23:58.254000000 -0400
+++ smeserver-wbl-0.3.0/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/wbl.pm	2017-05-06 00:32:25.070000000 -0400
@@ -228,7 +228,7 @@
     }
 
     ##Update email settings
-    unless ( system ("/sbin/e-smith/signal-event", "email-update") == 0 ){
+    unless ( system ("/sbin/e-smith/signal-event", "smeserver-wbl-update") == 0 ){
         $fm->error('ERROR_UPDATING');
         return undef;
     }
@@ -321,7 +321,7 @@
     }
 
     ##Update email settings
-    unless ( system ("/sbin/e-smith/signal-event", "email-update") == 0 ){
+    unless ( system ("/sbin/e-smith/signal-event", "smeserver-wbl-update") == 0 ){
         $fm->error('ERROR_UPDATING');
         return undef;
     }
@@ -334,7 +334,7 @@
     my $fm = shift;
     my $q = $fm->{'cgi'};
 
-    unless ( system ("/sbin/e-smith/signal-event", "email-update") == 0 )
+    unless ( system ("/sbin/e-smith/signal-event", "smeserver-wbl-update") == 0 )
     {
         $fm->error('ERROR_UPDATING');
         return undef;
@@ -394,7 +394,7 @@
 
     ##Update email settings
 
-    unless ( system ("/sbin/e-smith/signal-event", "email-update") == 0 ){
+    unless ( system ("/sbin/e-smith/signal-event", "smeserver-wbl-update") == 0 ){
         $fm->error('ERROR_UPDATING');
         return undef;
     }