[otrs-cvs] CVS: otrs/Kernel/System SearchProfile.pm,1.4,1.4.2.1

[cvs-log at otrs.org]

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

Modified Files:
      Tag: rel-2_1
	SearchProfile.pm 
Log Message:
improved login handling for case sensitive databases

Index: SearchProfile.pm
===================================================================
RCS file: /home/cvs/otrs/Kernel/System/SearchProfile.pm,v
retrieving revision 1.4
retrieving revision 1.4.2.1
diff -C2 -r1.4 -r1.4.2.1
*** SearchProfile.pm	29 Aug 2006 17:30:36 -0000	1.4
--- SearchProfile.pm	9 Jan 2007 11:36:23 -0000	1.4.2.1
***************
*** 1,5 ****
  # --
  # Kernel/System/SearchProfile.pm - module to manage search profiles
! # Copyright (C) 2001-2006 OTRS GmbH, http://otrs.org/
  # --
  # $Id$
--- 1,5 ----
  # --
  # Kernel/System/SearchProfile.pm - module to manage search profiles
! # Copyright (C) 2001-2007 OTRS GmbH, http://otrs.org/
  # --
  # $Id$
***************
*** 161,165 ****
          " profile_name = '$Param{Name}' ".
          " AND ".
!         " login = '$Param{Base}::$Param{UserLogin}'";
      my %Result = ();
      if ($Self->{DBObject}->Prepare(SQL => $SQL)) {
--- 161,165 ----
          " profile_name = '$Param{Name}' ".
          " AND ".
!         " LOWER(login) = LOWER('$Param{Base}::$Param{UserLogin}')";
      my %Result = ();
      if ($Self->{DBObject}->Prepare(SQL => $SQL)) {
***************
*** 207,211 ****
      # sql
      my $SQL = "DELETE FROM search_profile WHERE ".
!           " profile_name = '$Param{Name}' AND login = '$Param{Base}::$Param{UserLogin}'";
      if ($Self->{DBObject}->Do(SQL => $SQL)) {
          return 1;
--- 207,212 ----
      # sql
      my $SQL = "DELETE FROM search_profile WHERE ".
!         " profile_name = '$Param{Name}' AND ".
!         " LOWER(login) = LOWER('$Param{Base}::$Param{UserLogin}')";
      if ($Self->{DBObject}->Do(SQL => $SQL)) {
          return 1;
***************
*** 246,250 ****
          " search_profile ".
          " WHERE ".
!         " login = '$Param{Base}::$Param{UserLogin}'";
      my %Result = ();
      if ($Self->{DBObject}->Prepare(SQL => $SQL)) {
--- 247,251 ----
          " search_profile ".
          " WHERE ".
!         " LOWER(login) = LOWER('$Param{Base}::$Param{UserLogin}')";
      my %Result = ();
      if ($Self->{DBObject}->Prepare(SQL => $SQL)) {