diff --git a/ide/buildlazdialog.pas b/ide/buildlazdialog.pas
index 1b5758a3f3..8d36051d66 100644
--- a/ide/buildlazdialog.pas
+++ b/ide/buildlazdialog.pas
@@ -64,8 +64,8 @@ type
 
   TBuildLazarusFlag = (
     blfDontBuild,           // skip all building, only cleaning
-    blfOnlyIDE,             // skip all but IDE (for example build IDE, but not examples)
-    blfDontCleanAll,        // ignore clean up
+    blfOnlyIDE,             // skip all but IDE (for example build IDE, but not packages, not lazbuild, ...)
+    blfDontCleanAll,        // ignore clean up option in profile
     blfUseMakeIDECfg,       // append @idemake.cfg
     blfReplaceExe           // ignore OSLocksExecutables and do not create lazarus.new.exe
     );
diff --git a/ide/lazbuild.lpr b/ide/lazbuild.lpr
index bbef12f2e9..f1a2f73796 100644
--- a/ide/lazbuild.lpr
+++ b/ide/lazbuild.lpr
@@ -65,10 +65,10 @@ type
                                          var {%H-}Abort: boolean);
 
     // codetools
-    procedure OnCodeBufferDecodeLoaded(Code: TCodeBuffer;
-         const Filename: string; var Source, DiskEncoding, MemEncoding: string);
+    procedure OnCodeBufferDecodeLoaded({%H-}Code: TCodeBuffer;
+         const {%H-}Filename: string; var Source, DiskEncoding, MemEncoding: string);
     procedure OnCodeBufferEncodeSaving(Code: TCodeBuffer;
-                                    const Filename: string; var Source: string);
+                                    const {%H-}Filename: string; var Source: string);
 
     // global package functions
     procedure GetDependencyOwnerDescription(Dependency: TPkgDependency;
@@ -402,7 +402,6 @@ var
   PkgOptions: String;
   InheritedOptionStrings: TInheritedCompOptsStrings;
   TargetDir: String;
-  i: Integer;
 begin
   Result:=false;
   Init;