anchor.diff:  var
     Sep: TATStringSeparator;
     SModule, SProc, SProcParam: string;
  +  AppCmd: TAppCommand;
     i: integer;
   begin
     Result:= -1;
  
positive.code:   if SProc='' then exit;
  
    for i:= 0 to AppCommandList.Count-1 do
      with TAppCommand(AppCommandList[i]) do
        if (ItemModule=SModule) and (ItemProc=SProc) and (ItemProcParam=SProcParam) then
          exit(i);
  end;
  
  
  
negative.code: 
  function AppCommandHasConfigurableHotkey(Cmd: integer): boolean;
  begin
    Result:= AppCommandCategory(Cmd) in [categ_Normal, categ_Plugin, categ_PluginSub];
  end;
  
  
  