lib/Odin.pm: Include `creator' when reserving addresses.

[odin-cgi] / lib / Odin.pm

diff --git a/lib/Odin.pm b/lib/Odin.pm
index bc5947e..a575e83 100644 (file)
--- a/lib/Odin.pm
+++ b/lib/Odin.pm
@@ -621,7 +621,7 @@ sub reserve_redir ($$$) {
     for (my $i = 0; $i < $n; $i++) { push @l, gen_redir_name $db, $gen; }
     for my $l (@l) {
       insert_record $db, "odin_mailredir",
-       lpart => $l, dom => $dom, owner => $WHO,
+       lpart => $l, dom => $dom, owner => $WHO, creator => $WHO,
        st => 'reserved', expire => $NOW + $MAIL_AGEMAX_RESV;
     }
     check_redir_limits $db;