diff options
author | Alexander Sulfrian <alex@spline.inf.fu-berlin.de> | 2015-01-20 01:02:03 +0100 |
---|---|---|
committer | Alexander Sulfrian <alex@spline.inf.fu-berlin.de> | 2015-01-20 01:02:03 +0100 |
commit | c97119d61ab446b7761be94fc166dd6503e772d1 (patch) | |
tree | 959fa5ce9e993d53ad001f155eddaf5c9be65701 | |
parent | 828a23a7ebcdd37b36b8d3edef27ab8e324c7651 (diff) | |
download | DefaultRecipient-c97119d61ab446b7761be94fc166dd6503e772d1.tar.gz DefaultRecipient-c97119d61ab446b7761be94fc166dd6503e772d1.tar.bz2 DefaultRecipient-c97119d61ab446b7761be94fc166dd6503e772d1.zip |
FilterElementPre: Fix Hash vs. Hashref usage
-rw-r--r-- | Kernel/Output/HTML/ResponseChangeDefaultTo.pm | 21 |
1 files changed, 13 insertions, 8 deletions
diff --git a/Kernel/Output/HTML/ResponseChangeDefaultTo.pm b/Kernel/Output/HTML/ResponseChangeDefaultTo.pm index 2fb8500..66e34b6 100644 --- a/Kernel/Output/HTML/ResponseChangeDefaultTo.pm +++ b/Kernel/Output/HTML/ResponseChangeDefaultTo.pm @@ -44,25 +44,25 @@ sub Run { $Self->{LayoutObject}->FatalDie(); } - my @BlockData = $Self->{LayoutObject}->{BlockData}; + my $BlockData = $Self->{LayoutObject}->{BlockData}; # get ticket data - my %Ticket = (); + my $Ticket; BLOCK: - for my $block ( @BlockData ) { + for my $block ( @$BlockData ) { if ( $block->{Name} eq 'TicketBack' ) { - %Ticket = $block->{Data}; + $Ticket = $block->{Data}; last BLOCK; } } # return if not generated from template - return unless $Ticket{ResponseID}; + return unless $Ticket->{ResponseID}; # get all ResponseChangeDefaultTo my %MappedResponseChangeDefaultTo = $Self->{ResponseChangeDefaultToObject}->MappingList( - ResponseID => $Ticket{ResponseID}, + ResponseID => $Ticket->{ResponseID}, ); my $RemoveDefault = 0; @@ -82,8 +82,13 @@ sub Run { if ( $RemoveDefault ) { # remove preselected "To" address - $Self->{LayoutObject}->{BlockData} = - grep { $_->{Name} ne 'PreFilledToRow' } @BlockData; + for my $block ( @$BlockData ) { + if ( $block->{Name} eq 'PreFilledToRow' ) { + $block->{Data} = undef; + } + } + + $Self->{LayoutObject}->{BlockData} = $BlockData; } # add new addresses |