From 92965e62fde05dfaa6545b0b96b2acb1a84f9286 Mon Sep 17 00:00:00 2001
From: Wolfgang Sourdeau <wsourdeau@inverse.ca>
Date: Tue, 22 Jan 2008 21:55:48 +0000
Subject: [PATCH] Monotone-Parent: c00890a3638719c75d4c3a2a1be8103137ce8223
 Monotone-Revision: f085237afac89a09ecf165389cb0c7d9a516fcc0

Monotone-Author: wsourdeau@inverse.ca
Monotone-Date: 2008-01-22T21:55:48
Monotone-Branch: ca.inverse.sogo
---
 SOPE/sope-patchset-r1583.diff | 40 +++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)

diff --git a/SOPE/sope-patchset-r1583.diff b/SOPE/sope-patchset-r1583.diff
index ef5426a32..1539aa017 100644
--- a/SOPE/sope-patchset-r1583.diff
+++ b/SOPE/sope-patchset-r1583.diff
@@ -1202,6 +1202,46 @@ Index: sope-gdl1/PostgreSQL/PostgreSQL72Channel.m
  @end /* PostgreSQL72Channel */
  
  @implementation PostgreSQL72Channel(PrimaryKeyGeneration)
+Index: sope-gdl1/Oracle8/OracleAdaptorChannel.m
+===================================================================
+--- sope-gdl1/Oracle8/OracleAdaptorChannel.m	(révision 1583)
++++ sope-gdl1/Oracle8/OracleAdaptorChannel.m	(copie de travail)
+@@ -30,6 +30,7 @@
+ 
+ #import <NGExtensions/NSObject+Logs.h>
+ 
++static BOOL debugOn = NO;
+ //
+ //
+ //
+@@ -41,8 +42,16 @@
+ 
+ @implementation OracleAdaptorChannel (Private)
+ 
+--  (void) _cleanup
+++ (void) initialize
+ {
++  NSUserDefaults *ud;
++
++  ud = [NSUserDefaults standardUserDefaults];
++  debugOn = [ud boolForKey: @"OracleAdaptorDebug"];
++}
++
++- (void) _cleanup
++{
+   column_info *info;
+   int c;
+ 
+@@ -231,6 +240,9 @@
+ 
+   [self _cleanup];
+ 
++  if (debugOn)
++    [self logWithFormat: @"expression: %@", theExpression];
++
+   if (!theExpression || ![theExpression length])
+     {
+       [NSException raise: @"OracleInvalidExpressionException"
 Index: sope-core/NGExtensions/FdExt.subproj/NSString+Encoding.m
 ===================================================================
 --- sope-core/NGExtensions/FdExt.subproj/NSString+Encoding.m	(révision 1583)