diff options
author | Ivan Kohler <ivan@freeside.biz> | 2017-08-25 15:06:19 -0700 |
---|---|---|
committer | Ivan Kohler <ivan@freeside.biz> | 2017-08-25 15:06:19 -0700 |
commit | cbfeb5f6b7490f78361318ce6290bfb442dbfcbe (patch) | |
tree | e6409692bc2376649eeda94344f0a7f578a75428 /rt/lib/RT/Test.pm | |
parent | 8ffd7de981603a189cd0ea62ca948eaf3f66ca49 (diff) | |
parent | 5b5eb87bf66f1fac003a13dc2db48e8970c5c986 (diff) |
Merge branch 'master' of git.freeside.biz:/home/git/freeside
Diffstat (limited to 'rt/lib/RT/Test.pm')
-rw-r--r-- | rt/lib/RT/Test.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/rt/lib/RT/Test.pm b/rt/lib/RT/Test.pm index 257eea5b7..69019f6fe 100644 --- a/rt/lib/RT/Test.pm +++ b/rt/lib/RT/Test.pm @@ -2,7 +2,7 @@ # # COPYRIGHT: # -# This software is Copyright (c) 1996-2016 Best Practical Solutions, LLC +# This software is Copyright (c) 1996-2017 Best Practical Solutions, LLC # <sales@bestpractical.com> # # (Except where explicitly superseded by other copyright notices) @@ -1733,7 +1733,9 @@ sub parse_mail { require RT::EmailParser; my $parser = RT::EmailParser->new; $parser->ParseMIMEEntityFromScalar( $mail ); - return $parser->Entity; + my $entity = $parser->Entity; + $entity->{__store_link_to_object_to_avoid_early_cleanup} = $parser; + return $entity; } sub works { |