paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 20:38:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

EditorMacroScript: Allow skipping self-test. --skip-tests=MacroScript

Browse Source
This commit is contained in:
Martin 2022-03-30 22:54:20 +02:00
parent 4e9d8b173f
commit fc11d80277
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/macroscript/registerems.pas
View File

@ -9,7 +9,7 @@ uses
// LCL
Dialogs,
// IdeIntf
SrcEditorIntf, IDEOptionsIntf, IDEOptEditorIntf,
SrcEditorIntf, IDEOptionsIntf, IDEOptEditorIntf, IDEUtils,
// MacroScript
EMScriptMacro, EMSSelfTest, EMSIdeOptions, EMSStrings;
@ -29,6 +29,9 @@ begin
if not EMSSupported then {%H-}exit;
if GetSkipCheckByKey('MacroScript') or GetSkipCheckByKey('All') then
exit;
conf := GetEMSConf;
try
conf.Load;