1 |
slords |
1.1 |
diff -Nur -x '*.orig' -x '*.rej' e-smith-qmail-1.10.0/createlinks mezzanine_patched_e-smith-qmail-1.10.0/createlinks |
2 |
|
|
--- e-smith-qmail-1.10.0/createlinks 2007-01-22 09:08:46.000000000 -0700 |
3 |
|
|
+++ mezzanine_patched_e-smith-qmail-1.10.0/createlinks 2007-01-22 09:07:29.000000000 -0700 |
4 |
|
|
@@ -167,6 +167,13 @@ |
5 |
|
|
event_link("qmail-update-group", $event, "20"); |
6 |
|
|
|
7 |
|
|
#-------------------------------------------------- |
8 |
|
|
+# actions for user-modify-admin event |
9 |
|
|
+#-------------------------------------------------- |
10 |
|
|
+$event = "user-modify-admin"; |
11 |
|
|
+ |
12 |
|
|
+event_link("qmail-update-user", $event, "20"); |
13 |
|
|
+ |
14 |
|
|
+#-------------------------------------------------- |
15 |
|
|
# actions for user-delete event |
16 |
|
|
#-------------------------------------------------- |
17 |
|
|
$event = "user-delete"; |
18 |
|
|
diff -Nur -x '*.orig' -x '*.rej' e-smith-qmail-1.10.0/root/etc/e-smith/events/actions/qmail-update-user mezzanine_patched_e-smith-qmail-1.10.0/root/etc/e-smith/events/actions/qmail-update-user |
19 |
|
|
--- e-smith-qmail-1.10.0/root/etc/e-smith/events/actions/qmail-update-user 2006-03-14 12:51:57.000000000 -0700 |
20 |
|
|
+++ mezzanine_patched_e-smith-qmail-1.10.0/root/etc/e-smith/events/actions/qmail-update-user 2007-01-22 09:08:23.000000000 -0700 |
21 |
|
|
@@ -41,7 +41,7 @@ |
22 |
|
|
my $user = $accountsdb->get($userName); |
23 |
|
|
die |
24 |
|
|
"Account $userName is not a user account; update email forwarding failed.\n" |
25 |
|
|
- unless ($user && $user->prop('type') eq "user"); |
26 |
|
|
+ unless $userName eq 'admin' || ($user && $user->prop('type') eq "user"); |
27 |
|
|
@users = ($user); |
28 |
|
|
} |
29 |
|
|
else |