Rename ResponseChangeDefaultTo to DefaultTo

1 files changed, 0 insertions, 361 deletions

diff --git a/Kernel/Modules/AdminResponseChangeDefaultToTemplates.pm b/Kernel/Modules/AdminResponseChangeDefaultToTemplates.pm
deleted file mode 100644
index 02a0b36..0000000
--- a/Kernel/Modules/AdminResponseChangeDefaultToTemplates.pm
+++ /dev/null
@@ -1,361 +0,0 @@
-# --
-# Kernel/Modules/AdminResponseChangeDefaultToTemplates.pm - to manage ResponseChangeDefaultTo <-> templates assignments
-# Copyright (C) 2015 Alexander Sulfrian <alex@spline.inf.fu-berlin.de>
-# --
-# This software comes with ABSOLUTELY NO WARRANTY. For details, see
-# the enclosed file COPYING for license information (AGPL). If you
-# did not receive this file, see http://www.gnu.org/licenses/agpl.txt.
-# --
-
-package Kernel::Modules::AdminResponseChangeDefaultToTemplates;
-
-use strict;
-use warnings;
-
-use Kernel::System::ResponseChangeDefaultTo;
-use Kernel::System::StandardTemplate;
-
-sub new {
-    my ( $Type, %Param ) = @_;
-
-    # allocate new hash for object
-    my $Self = {%Param};
-    bless( $Self, $Type );
-
-    # check all needed objects
-    for (qw(ParamObject DBObject QueueObject LayoutObject ConfigObject LogObject)) {
-        if ( !$Self->{$_} ) {
-            $Self->{LayoutObject}->FatalError( Message => "Got no $_!" );
-        }
-    }
-
-    $Self->{ResponseChangeDefaultToObject} =
-        Kernel::System::ResponseChangeDefaultTo->new(%Param);
-    $Self->{StandardTemplateObject} =
-        Kernel::System::StandardTemplate->new(%Param);
-
-    return $Self;
-}
-
-sub Run {
-    my ( $Self, %Param ) = @_;
-
-    # ------------------------------------------------------------ #
-    # template <-> ResponseChangeDefaultTo 1:n
-    # ------------------------------------------------------------ #
-    if ( $Self->{Subaction} eq 'Template' ) {
-
-        # get template data
-        my $ID = $Self->{ParamObject}->GetParam( Param => 'ID' );
-        my %StandardTemplateData = $Self->{StandardTemplateObject}->StandardTemplateGet( ID => $ID );
-        my $StandardTemplateType = $Self->{LayoutObject}->{LanguageObject}->Translate(
-            $StandardTemplateData{TemplateType},
-        );
-        my $Name = $StandardTemplateType . ' - ' . $StandardTemplateData{Name};
-
-        # get ResponseChangeDefaultTo data
-        my %ResponseChangeDefaultToData =
-            $Self->{ResponseChangeDefaultToObject}->List();
-
-        my %Member = $Self->{ResponseChangeDefaultToObject}->MappingList(
-            ResponseID => $ID,
-        );
-
-        my $Output = $Self->{LayoutObject}->Header();
-        $Output .= $Self->{LayoutObject}->NavigationBar();
-        $Output .= $Self->_Change(
-            Data    => \%ResponseChangeDefaultToData,
-            ID      => $ID,
-            Name    => $Name,
-            Mapping => \%Member,
-            Type     => 'Template',
-        );
-        $Output .= $Self->{LayoutObject}->Footer();
-        return $Output;
-    }
-
-    # ------------------------------------------------------------ #
-    # templates <-> ResponseChangeDefaultTo n:1
-    # ------------------------------------------------------------ #
-    elsif ( $Self->{Subaction} eq 'ResponseChangeDefaultTo' ) {
-
-        my $ID = $Self->{ParamObject}->GetParam( Param => 'ID' );
-        my %ResponseChangeDefaultToData =
-            $Self->{ResponseChangeDefaultToObject}->Get( ID => $ID );
-
-        # get templates
-        my %StandardTemplateData = $Self->{StandardTemplateObject}->StandardTemplateList(
-            Valid => 1,
-        );
-
-        if (%StandardTemplateData) {
-            for my $StandardTemplateID ( sort keys %StandardTemplateData ) {
-                my %Data = $Self->{StandardTemplateObject}->StandardTemplateGet(
-                    ID => $StandardTemplateID
-                );
-                $StandardTemplateData{$StandardTemplateID}
-                    = $Self->{LayoutObject}->{LanguageObject}->Translate( $Data{TemplateType} )
-                    . ' - '
-                    . $Data{Name};
-            }
-        }
-
-        # get assigned templates
-        my %Member = $Self->{ResponseChangeDefaultToObject}->MappingList(
-            ResponseChangeDefaultToID => $ID,
-        );
-
-        my $Output = $Self->{LayoutObject}->Header();
-        $Output .= $Self->{LayoutObject}->NavigationBar();
-        $Output .= $Self->_Change(
-            Data    => \%StandardTemplateData,
-            ID      => $ID,
-            Name    => $ResponseChangeDefaultToData{Title},
-            Mapping => \%Member,
-            Type    => 'ResponseChangeDefaultTo',
-        );
-        $Output .= $Self->{LayoutObject}->Footer();
-        return $Output;
-    }
-
-    # ------------------------------------------------------------ #
-    # add templates to ResponseChangeDefaultTo
-    # ------------------------------------------------------------ #
-    elsif ( $Self->{Subaction} eq 'ChangeResponseChangeDefaultTo' ) {
-
-        # challenge token check for write action
-        $Self->{LayoutObject}->ChallengeTokenCheck();
-
-        # get current mapping
-        my $ID = $Self->{ParamObject}->GetParam( Param => 'ID' );
-        my %Mapping = $Self->{ResponseChangeDefaultToObject}->MappingList(
-            ResponseChangeDefaultToID => $ID,
-        );
-
-        # get new templates
-        my @TemplatesSelected = $Self->{ParamObject}->GetArray( Param => 'ItemsSelected' );
-        my @TemplatesAll      = $Self->{ParamObject}->GetArray( Param => 'ItemsAll' );
-
-        # create hash with selected templates
-        my %TemplatesSelected = map { $_ => 1 } @TemplatesSelected;
-
-        # check all used templates
-        for my $TemplateID (@TemplatesAll) {
-            if ( $TemplatesSelected{$TemplateID} ) {
-                if ( ! $Mapping{$TemplateID} ) {
-                    $Self->{ResponseChangeDefaultToObject}->MappingAdd(
-                        ResponseID => $TemplateID,
-                        ResponseChangeDefaultToID => $ID,
-                    );
-                }
-            }
-            else {
-                if ( $Mapping{$TemplateID} ) {
-                    $Self->{ResponseChangeDefaultToObject}->MappingDelete(
-                        ID => $Mapping{$TemplateID},
-                    );
-                }
-            }
-        }
-
-        return $Self->{LayoutObject}->Redirect( OP => "Action=$Self->{Action}" );
-    }
-
-    # ------------------------------------------------------------ #
-    # add queues to template
-    # ------------------------------------------------------------ #
-    elsif ( $Self->{Subaction} eq 'ChangeTemplate' ) {
-
-        # challenge token check for write action
-        $Self->{LayoutObject}->ChallengeTokenCheck();
-
-        # get current mapping
-        my $ID = $Self->{ParamObject}->GetParam( Param => 'ID' );
-        my %Mapping = $Self->{ResponseChangeDefaultToObject}->MappingList(
-            ResponseID => $ID,
-        );
-
-        # get new queues
-        my @Selected = $Self->{ParamObject}->GetArray( Param => 'ItemsSelected' );
-        my @All      = $Self->{ParamObject}->GetArray( Param => 'ItemsAll' );
-
-        # create hash with selected queues
-        my %Selected = map { $_ => 1 } @Selected;
-
-        # check all used queues
-        for my $DefaultToID (@All) {
-            if ( $Selected{$DefaultToID} ) {
-                if ( ! $Mapping{$DefaultToID} ) {
-                    $Self->{ResponseChangeDefaultToObject}->MappingAdd(
-                        ResponseID => $ID,
-                        ResponseChangeDefaultToID => $DefaultToID,
-                    );
-                }
-            }
-            else {
-                if ( $Mapping{$DefaultToID} ) {
-                    $Self->{ResponseChangeDefaultToObject}->MappingDelete(
-                        ID => $Mapping{$DefaultToID},
-                    );
-                }
-            }
-        }
-
-        return $Self->{LayoutObject}->Redirect( OP => "Action=$Self->{Action}" );
-    }
-
-    # ------------------------------------------------------------ #
-    # overview
-    # ------------------------------------------------------------ #
-    my $Output = $Self->{LayoutObject}->Header();
-    $Output .= $Self->{LayoutObject}->NavigationBar();
-    $Output .= $Self->_Overview();
-    $Output .= $Self->{LayoutObject}->Footer();
-    return $Output;
-}
-
-sub _Change {
-    my ( $Self, %Param ) = @_;
-
-    my %Data    = %{ $Param{Data} };
-    my %Mapping = %{ $Param{Mapping} };
-    my $Type    = $Param{Type} || 'Template';
-    my $NeType  = 'ResponseChangeDefaultTo';
-    $NeType     = 'Template' if $Type eq 'ResponseChangeDefaultTo';
-
-    $Self->{LayoutObject}->Block( Name => 'Overview' );
-    $Self->{LayoutObject}->Block( Name => 'ActionList' );
-    $Self->{LayoutObject}->Block( Name => 'ActionOverview' );
-    $Self->{LayoutObject}->Block( Name => 'Filter' );
-
-    $Self->{LayoutObject}->Block(
-        Name => 'Change',
-        Data => {
-            ID         => $Param{ID},
-            Name       => $Param{Name},
-            ActionHome => 'Admin' . $Type,
-            NeType     => $NeType,
-        },
-    );
-
-    $Self->{LayoutObject}->Block( Name => "ChangeHeader$NeType" );
-
-    for my $ID ( sort { uc( $Data{$a} ) cmp uc( $Data{$b} ) } keys %Data ) {
-
-        # set output class
-        my $Selected = $Mapping{$ID} ? ' checked="checked"' : '';
-
-        $Self->{LayoutObject}->Block(
-            Name => 'ChangeRow',
-            Data => {
-                Type      => $NeType,
-                ID        => $ID,
-                Name      => $Data{$ID},
-                Selected  => $Selected,
-            },
-        );
-    }
-
-    return $Self->{LayoutObject}->Output(
-        TemplateFile => 'AdminResponseChangeDefaultToTemplates',
-        Data         => \%Param,
-    );
-}
-
-sub _Overview {
-    my ( $Self, %Param ) = @_;
-
-    $Self->{LayoutObject}->Block(
-        Name => 'Overview',
-        Data => {},
-    );
-
-    # no actions in action list
-    #    $Self->{LayoutObject}->Block(Name=>'ActionList');
-    $Self->{LayoutObject}->Block( Name => 'FilterTemplate' );
-    $Self->{LayoutObject}->Block( Name => 'FilterResponseChangeDefaultTo' );
-    $Self->{LayoutObject}->Block( Name => 'OverviewResult' );
-
-    # get std template list
-    my %StandardTemplateData = $Self->{StandardTemplateObject}->StandardTemplateList(
-        Valid => 1,
-    );
-
-    # if there are results to show
-    if (%StandardTemplateData) {
-        for my $StandardTemplateID ( sort keys %StandardTemplateData ) {
-            my %Data = $Self->{StandardTemplateObject}->StandardTemplateGet(
-                ID => $StandardTemplateID,
-            );
-            $StandardTemplateData{$StandardTemplateID}
-                = $Self->{LayoutObject}->{LanguageObject}->Translate( $Data{TemplateType} )
-                . ' - '
-                . $Data{Name};
-        }
-        for my $StandardTemplateID (
-            sort { uc( $StandardTemplateData{$a} ) cmp uc( $StandardTemplateData{$b} ) }
-            keys %StandardTemplateData
-            )
-        {
-
-            # set output class
-            $Self->{LayoutObject}->Block(
-                Name => 'List1n',
-                Data => {
-                    Name      => $StandardTemplateData{$StandardTemplateID},
-                    Subaction => 'Template',
-                    ID        => $StandardTemplateID,
-                },
-            );
-        }
-    }
-
-    # otherwise it displays a no data found message
-    else {
-        $Self->{LayoutObject}->Block(
-            Name => 'NoTemplatesFoundMsg',
-            Data => {},
-        );
-    }
-
-    # get queue data
-    my %ResponseChangeDefaultToData =
-        $Self->{ResponseChangeDefaultToObject}->List();
-
-    # if there are results to show
-    if (%ResponseChangeDefaultToData) {
-        for my $ID (
-            sort { uc( $ResponseChangeDefaultToData{$a} ) cmp
-                   uc( $ResponseChangeDefaultToData{$b} ) }
-            keys %ResponseChangeDefaultToData
-            )
-        {
-
-            # set output class
-            $Self->{LayoutObject}->Block(
-                Name => 'Listn1',
-                Data => {
-                    Name      => $ResponseChangeDefaultToData{$ID},
-                    Subaction => 'ResponseChangeDefaultTo',
-                    ID        => $ID,
-                },
-            );
-        }
-    }
-
-    # otherwise it displays a no data found message
-    else {
-        $Self->{LayoutObject}->Block(
-            Name => 'NoResponseChangeDefaultToFoundMsg',
-            Data => {},
-        );
-    }
-
-    # return output
-    return $Self->{LayoutObject}->Output(
-        TemplateFile => 'AdminResponseChangeDefaultToTemplates',
-        Data         => \%Param,
-    );
-}
-
-1;