From 180adb43d41ccc8862112cc7418226f03f5e2189 Mon Sep 17 00:00:00 2001
From: "justdave%bugzilla.org" <>
Date: Mon, 13 Sep 2004 03:20:42 +0000
Subject: Bug 253696: work around NAME_lc bug in ActiveState Perl on Win32
 Patch by Byron Jones <bugzilla@glob.com.au> r=jouni,bbaetz a=justdave

---
 Bugzilla/DB.pm | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/Bugzilla/DB.pm b/Bugzilla/DB.pm
index 445e29500..ca2ee29fa 100644
--- a/Bugzilla/DB.pm
+++ b/Bugzilla/DB.pm
@@ -152,8 +152,12 @@ sub _connect {
                              Password => $db_pass,
                              ShowErrorStatement => 1,
                              HandleError => \&_handle_error,
-                             FetchHashKeyName => 'NAME_lc',
                              TaintIn => 1,
+                             FetchHashKeyName => 'NAME',  
+                             # Note: NAME_lc causes crash on ActiveState Perl
+                             # 5.8.4 (see Bug 253696)
+                             # XXX - This will likely cause problems in DB
+                             # back ends that twiddle column case (Oracle?)
                            });
 
     return $dbh;
-- 
cgit v1.2.3-24-g4f1b