[otrs-cvs] SIRIOS/Kernel/Modules AgentWorkingRoleSelection.pm, 1.5, 1.6

[cvs-log at otrs.org]

Comments:
Update of /home/cvs/SIRIOS/Kernel/Modules
In directory lancelot:/tmp/cvs-serv22497/Kernel/Modules

Modified Files:
	AgentWorkingRoleSelection.pm 
Log Message:
Improvements because of the code filter.

Author: tr

Index: AgentWorkingRoleSelection.pm
===================================================================
RCS file: /home/cvs/SIRIOS/Kernel/Modules/AgentWorkingRoleSelection.pm,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** AgentWorkingRoleSelection.pm	3 Feb 2008 08:19:18 -0000	1.5
--- AgentWorkingRoleSelection.pm	4 Feb 2008 06:39:48 -0000	1.6
***************
*** 22,32 ****
  
      # allocate new hash for object
!     my $Self = {};
      bless( $Self, $Type );
  
-     for ( keys %Param ) {
-         $Self->{$_} = $Param{$_};
-     }
- 
      # check needed objects
      for (qw(ParamObject DBObject LayoutObject LogObject ConfigObject)) {
--- 22,28 ----
  
      # allocate new hash for object
!     my $Self = { %Param };
      bless( $Self, $Type );
  
      # check needed objects
      for (qw(ParamObject DBObject LayoutObject LogObject ConfigObject)) {