From e5d74ab9460be98422c6eab9a8a41a24f692719b Mon Sep 17 00:00:00 2001
From: Remi Collet <fedora@famillecollet.com>
Date: Mon, 9 May 2011 17:33:54 +0200
Subject: perl-DBD-MySQL: workarond for https://bugzilla.redhat.com/703185

---
 is_prefix.patch | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 is_prefix.patch

(limited to 'is_prefix.patch')

diff --git a/is_prefix.patch b/is_prefix.patch
new file mode 100644
index 0000000..d573c6c
--- /dev/null
+++ b/is_prefix.patch
@@ -0,0 +1,12 @@
+diff -up DBD-mysql-4.018/mysql.xs.orig DBD-mysql-4.018/mysql.xs
+--- DBD-mysql-4.018/mysql.xs.orig	2011-05-09 17:22:51.607043049 +0200
++++ DBD-mysql-4.018/mysql.xs	2011-05-09 17:23:19.895077638 +0200
+@@ -721,7 +721,7 @@ dbd_mysql_get_info(dbh, sql_info_type)
+ 	case SQL_IDENTIFIER_QUOTE_CHAR:
+ 	    /*XXX What about a DB started in ANSI mode? */
+ 	    /* Swiped from MyODBC's get_info.c */
+-	    using_322=is_prefix(mysql_get_server_info(imp_dbh->pmysql),"3.22");
++	    using_322=0;
+ 	    retsv = newSVpv(!using_322 ? "`" : " ", 1);
+ 	    break;
+ 	case SQL_MAXIMUM_STATEMENT_LENGTH:
-- 
cgit