diff --git a/developer/src/tike/debug/Keyman.System.Debug.DebugCore.pas b/developer/src/tike/debug/Keyman.System.Debug.DebugCore.pas index f20c595d07..05ded33f79 100644 --- a/developer/src/tike/debug/Keyman.System.Debug.DebugCore.pas +++ b/developer/src/tike/debug/Keyman.System.Debug.DebugCore.pas @@ -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]); diff --git a/developer/src/tike/main/Keyman.System.KeymanCore.pas b/developer/src/tike/main/Keyman.System.KeymanCore.pas index d4e1d25e01..8abe073317 100644 --- a/developer/src/tike/main/Keyman.System.KeymanCore.pas +++ b/developer/src/tike/main/Keyman.System.KeymanCore.pas @@ -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;