Fix for the link maps that are now in RT::Link.

diff --git a/local/lib/RT/Interface/Email/Filter/TakeAction.pm b/local/lib/RT/Interface/Email/Filter/TakeAction.pm
index f4bd25f3feedd4190fe884265d3472675374baa4..7a96fb47b3c11824b787f12e1ea7227b995f80d0 100644 (file)
--- a/local/lib/RT/Interface/Email/Filter/TakeAction.pm
+++ b/local/lib/RT/Interface/Email/Filter/TakeAction.pm
@@ -326,8 +326,9 @@ sub GetCurrentUser {
             my %tmp = _ParseAdditiveCommand( \%cmds, 1, $type );
             next unless keys %tmp;
 
-            my $link_type = $ticket_as_user->LINKTYPEMAP->{ $type }->{'Type'};
-            my $link_mode = $ticket_as_user->LINKTYPEMAP->{ $type }->{'Mode'};
+            my $typemap = keys %RT::Link::TYPEMAP ? \%RT::Link::TYPEMAP : $ticket_as_user->LINKTYPEMAP;
+            my $link_type = $typemap->{$type}->{'Type'};
+            my $link_mode = $typemap->{$type}->{'Mode'};
 
             $tmp{'Default'} = [ do {
                 my %h = ( Base => 'Target', Target => 'Base' );