1
0
mirror of https://github.com/moparisthebest/hexchat synced 2024-11-24 10:12:22 -05:00

Don't install spelling dicts if win8+

This commit is contained in:
TingPing 2015-02-22 00:20:26 -05:00
parent 7e7e87600e
commit b009084a52

View File

@ -230,8 +230,16 @@ end;
///////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////
function CheckSpellInstall(): Boolean; function CheckSpellInstall(): Boolean;
var
Version: TWindowsVersion;
begin begin
Result := DirExists(ExpandConstant('{localappdata}') + '\enchant');; GetWindowsVersionEx(Version);
// Windows 8 or greater has built in spell check.
if Version.NTPlatform and (Version.Major > 6) or ((Version.Major = 6) and (Version.Minor > 1)) then
Result := True
else
Result := DirExists(ExpandConstant('{localappdata}') + '\enchant\myspell');
end; end;
///////////////////////////////////////////////////////////////////// /////////////////////////////////////////////////////////////////////