added mail properties
This commit is contained in:
parent
504de54d61
commit
47a79bf060
5 changed files with 152 additions and 3 deletions
|
|
@ -163,7 +163,7 @@ sub execute {
|
|||
}
|
||||
my $post = undef;
|
||||
if ($message->{inReplyTo}) {
|
||||
$message->{inReplyTo} =~ m/WebGUI\-([\w_-]{22})/;
|
||||
$message->{inReplyTo} =~ m/cs\-([\w_-]{22})/;
|
||||
my $id = $1;
|
||||
$post = WebGUI::Asset->newByDynamicClass($self->session, $id);
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue