[otrs-cvs] CVS: otrs/Kernel/System/Auth LDAP.pm,1.27,1.28

[cvs-log at otrs.org]

Update of /home/cvs/otrs/Kernel/System/Auth
In directory lancelot:/tmp/cvs-serv10807/System/Auth

Modified Files:
	LDAP.pm 
Log Message:
Added new config param 'AuthModule::LDAP::UserLowerCase' to convert agent usernames to lower case letters


Index: LDAP.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/Auth/LDAP.pm,v
retrieving revision 1.27
retrieving revision 1.28
diff -C2 -r1.27 -r1.28
*** LDAP.pm	20 Oct 2006 21:32:38 -0000	1.27
--- LDAP.pm	8 Nov 2006 15:37:03 -0000	1.28
***************
*** 52,55 ****
--- 52,56 ----
      $Self->{UserAttr} = $Self->{ConfigObject}->Get('AuthModule::LDAP::UserAttr') || 'DN';
      $Self->{UserSuffix} = $Self->{ConfigObject}->Get('AuthModule::LDAP::UserSuffix') || '';
+     $Self->{UserLowerCase} = $Self->{ConfigObject}->Get('AuthModule::LDAP::UserLowerCase') || 0;
      $Self->{DestCharset} = $Self->{ConfigObject}->Get('AuthModule::LDAP::Charset') || 'utf-8';
  
***************
*** 100,103 ****
--- 101,110 ----
      $Param{User} =~ s/^\s+//;
      $Param{User} =~ s/\s+$//;
+ 
+     # Convert username to lower case letters
+     if ($Self->{UserLowerCase}) {
+         $Param{User} = lc($Param{User});
+     }
+ 
      # add user suffix
      if ($Self->{UserSuffix}) {
***************
*** 289,292 ****
--- 296,300 ----
                  }
              }
+ 
              # sync user
              if (%SyncUser) {