[Libreoffice-commits] core.git: wizards/source

[Jean-Pierre Ledure]

 wizards/source/access2base/Database.xba    |    3 +--
 wizards/source/access2base/acConstants.xba |    2 +-
 2 files changed, 2 insertions(+), 3 deletions(-)

New commits:
commit 115a6d2587a03218d41c173beb437a6bf59def10
Author: Jean-Pierre Ledure <j...@ledure.be>
Date:   Sat Dec 12 16:36:34 2015 +0100

    Access2Base - More coherent use of the acUTF8Encoding constant
    
    Change-Id: Ibcffe9d8b85d552f53246a3ac751000673705ab3

diff --git a/wizards/source/access2base/Database.xba 
b/wizards/source/access2base/Database.xba
index 52aafa0..81a233e 100644
--- a/wizards/source/access2base/Database.xba
+++ b/wizards/source/access2base/Database.xba
@@ -1016,12 +1016,11 @@ Private Function _FilterOptionsDefault() As String
 Dim sFieldSeparator as string
 Const cstComma = &quot;,&quot;
 Const cstTextDelimitor = &quot;&quot;&quot;&quot;
-Const cstCharacterSet = 76                     &apos;  Unicode (UTF-8)
 
        If _DecimalPoint() = &quot;,&quot; Then sFieldSeparator = &quot;;&quot; 
Else sFieldSeparator = cstComma
        _FilteroptionsDefault = Trim(Str(Asc(sFieldSeparator))) _
                                                                &amp; cstComma 
&amp; Trim(Str(Asc(cstTextDelimitor))) _
-                                                               &amp; cstComma 
&amp; Trim(Str(cstCharacterSet)) _
+                                                               &amp; cstComma 
&amp; Trim(Str(acUTF8Encoding)) _
                                                                &amp; cstComma 
&amp; &quot;1&quot;
 
 End Function           &apos;  _FilterOptionsDefault   V1.4.0
diff --git a/wizards/source/access2base/acConstants.xba 
b/wizards/source/access2base/acConstants.xba
index 1a3db6a..5c390cb 100644
--- a/wizards/source/access2base/acConstants.xba
+++ b/wizards/source/access2base/acConstants.xba
@@ -279,7 +279,7 @@ Global Const acOutputForm = 2
 
 REM AcEncoding
 REM -----------------------------------------------------------------
-Global Const acUTF8Encoding = 65001
+Global Const acUTF8Encoding = 76
 
 REM AcFormat
 REM -----------------------------------------------------------------
_______________________________________________
Libreoffice-commits mailing list
libreoffice-comm...@lists.freedesktop.org
http://lists.freedesktop.org/mailman/listinfo/libreoffice-commits