Issue #1947: don't change case of detected column names, in CSV parser

HeidiSQL · May 1, 2024 · 8ed3444 · 8ed3444
1 parent 5966986
commit 8ed3444
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/source/dbconnection.pas b/source/dbconnection.pas
@@ -5211,8 +5211,9 @@ function TDBConnection.DeQuoteIdent(Identifier: String; Glue: Char=#0): String;
 function TDBConnection.CleanIdent(Identifier: string): string;
 begin
   Result := Trim(Identifier);
-  Result := LowerCase(Result);
-  Result := ReplaceRegExpr('[^a-z0-9]', Result, '_');
+  // See issue #1947:
+  //Result := LowerCase(Result);
+  Result := ReplaceRegExpr('[^A-Za-z0-9]', Result, '_');
   Result := ReplaceRegExpr('_+', Result, '_');
 end;