chiark
/
gitweb
/
~mdw
/
odin-cgi
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Allow users to give away local parts to other users.
[odin-cgi]
/
lib
/
Odin.pm
diff --git
a/lib/Odin.pm
b/lib/Odin.pm
index 06b5212fcf929c4bc7791c06e5dca2503279f278..154fae0b1c9511cde89593cb42cf4cb0bf34fdb7 100644
(file)
--- a/
lib/Odin.pm
+++ b/
lib/Odin.pm
@@
-586,7
+586,8
@@
sub new_redir ($$\%;$) {
while (@l < $n) {
my $l = Odin::gen_redir_name $db, $gen;
insert_record $db, "odin_mailredir",
while (@l < $n) {
my $l = Odin::gen_redir_name $db, $gen;
insert_record $db, "odin_mailredir",
- lpart => $l, dom => $dom, owner => $WHO, st => 'live',
+ lpart => $l, dom => $dom, st => 'live',
+ owner => $WHO, creator => $WHO,
recip => $r->{recip} // qualify_recip $Odin::WHO,
expire => $r->{expire} // -1,
comment => $r->{comment} // "";
recip => $r->{recip} // qualify_recip $Odin::WHO,
expire => $r->{expire} // -1,
comment => $r->{comment} // "";