anchor.diff:  
   function MsgBox(const Str: string; Flags: Longint): integer;
   function AppKeymapHasDuplicates: boolean;
  -function AppKeymapHasDuplicateForKey(const AHotkey: string): boolean;
  +function AppKeymapHasDuplicateForKey(AHotkey, AKeyComboSeparator: string): boolean;
   
   procedure DoOps_SaveKeyItem(K: TATKeymapItem; const path, ALexerName: string);
   procedure DoOps_SaveKey_ForPluginModuleAndMethod(AOverwriteKey: boolean;
  
positive.code: 
  procedure DoOps_SaveKey_ForPluginModuleAndMethod(AOverwriteKey: boolean;
    const AMenuitemCaption, AModuleName, AMethodName, ALexerName, AHotkey: string);
  var
    c: TJSONConfig;
    sl: TStringList;
  
negative.code: begin
    //check-1: is key registered for any other command?
    if not AOverwriteKey then
      if AppKeymapHasDuplicateForKey(AHotkey, cKeyComboSeparator) then exit;
  
    c:= TJSONConfig.Create(nil);
    sl:= TStringlist.create;
  