[Rt-commit] r17345 - rt/3.8/trunk/lib/RT

ruz at bestpractical.com ruz at bestpractical.com
Wed Dec 24 22:06:03 EST 2008


Author: ruz
Date: Wed Dec 24 22:06:03 2008
New Revision: 17345

Modified:
   rt/3.8/trunk/lib/RT/Test.pm

Log:
* we must set oracle's NLS environment variables as those
  are cached on first use

Modified: rt/3.8/trunk/lib/RT/Test.pm
==============================================================================
--- rt/3.8/trunk/lib/RT/Test.pm	(original)
+++ rt/3.8/trunk/lib/RT/Test.pm	Wed Dec 24 22:06:03 2008
@@ -296,6 +296,10 @@
 
 sub _get_dbh {
     my ($dsn, $user, $pass) = @_;
+    if ( $dsn =~ /Oracle/i ) {
+        $ENV{'NLS_LANG'} = "AMERICAN_AMERICA.AL32UTF8";
+        $ENV{'NLS_NCHAR'} = "AL32UTF8";
+    }
     my $dbh = DBI->connect(
         $dsn, $user, $pass,
         { RaiseError => 0, PrintError => 1 },


More information about the Rt-commit mailing list