erabo/spiegel-keyman
1
0
Fork 0
mirror of https://github.com/keymanapp/keyman.git synced 2026-08-06 17:05:34 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions 13

chore: rename _km_kbp_ to _km_core_

Browse source
This commit is contained in:
Marc Durdin 2023-10-09 14:38:41 +07:00
parent db76e2541d
commit 0e4c4cbcf0
2 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
developer/src/tike/debug/Keyman.System.Debug.DebugCore.pas
View file

@ -87,7 +87,7 @@ begin
begin
path := TKeymanPaths.KeymanCoreLibraryPath(kmnkbp0);
try
_km_kbp_set_library_path(path);
_km_core_set_library_path(path);
except
on E:Exception do
raise EDebugCore.CreateFmt('Unable to load Keyman Core library at %s: %s %s', [path, E.ClassName, E.Message]);

4
developer/src/tike/main/Keyman.System.KeymanCore.pas
View file

@ -630,7 +630,7 @@ const
KM_CORE_KMX_ENV_CAPSLOCK = 'capsLock';
KM_CORE_KMX_ENV_BASELAYOUTGIVESCTRLRALTFORRALT = 'baseLayoutGivesCtrlRAltForRAlt';
procedure _km_kbp_set_library_path(const path: string);
procedure _km_core_set_library_path(const path: string);
implementation
@ -638,7 +638,7 @@ uses
System.SysUtils,
Winapi.Windows;
procedure _km_kbp_set_library_path(const path: string);
procedure _km_core_set_library_path(const path: string);
begin
if LoadLibrary(PChar(path)) = 0 then
RaiseLastOSError;