diff --git a/WindowsApp1/Compact.vb b/WindowsApp1/Compact.vb index 73ea797..be92242 100644 --- a/WindowsApp1/Compact.vb +++ b/WindowsApp1/Compact.vb @@ -7,7 +7,7 @@ Imports System.Management Public Class Compact - Shared version = "2.3.2" + Shared version = "2.3.3" Private WithEvents MyProcess As Process Private Delegate Sub AppendOutputTextDelegate(ByVal text As String) diff --git a/WindowsApp1/My Project/AssemblyInfo.vb b/WindowsApp1/My Project/AssemblyInfo.vb index 8306d73..6210684 100644 --- a/WindowsApp1/My Project/AssemblyInfo.vb +++ b/WindowsApp1/My Project/AssemblyInfo.vb @@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices ' by using the '*' as shown below: ' - - + + diff --git a/WindowsApp1/VersionCheck.vb b/WindowsApp1/VersionCheck.vb index c4b4645..a337ab9 100644 --- a/WindowsApp1/VersionCheck.vb +++ b/WindowsApp1/VersionCheck.vb @@ -29,7 +29,7 @@ Public Class VersionCheck Shared Function XMLParse(versionDoc As XDocument, version As String) Dim info As XElement = versionDoc.Root - xml_MajorVer = Single.Parse(info.Element("VersionMajor").Value, CultureInfo.CurrentUICulture) + xml_MajorVer = Single.Parse(info.Element("VersionMajor").Value, CultureInfo.InvariantCulture) xml_MinorVer = info.Element("VersionMinor").Value xml_VersionStr = info.Element("VersionStr").Value xml_ChocoVStr = info.Element("ChocolateyVStr").Value @@ -37,7 +37,7 @@ Public Class VersionCheck xml_Changes = info.Element("Changes").Value.Split("|") xml_Fixes = info.Element("Fixes").Value.Split("|") - Dim exe_MajorVer As Single = Single.Parse(version.Substring(0, version.LastIndexOf(".")), CultureInfo.CurrentUICulture) + Dim exe_MajorVer As Single = Single.Parse(version.Substring(0, version.LastIndexOf(".")), CultureInfo.InvariantCulture) Dim exe_MinorVer As Integer = CInt(version.Substring(version.LastIndexOf(".") + 1)) If xml_MajorVer > exe_MajorVer Then