From 996416c73503d333dcb59e2839dda07f5043e217 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 23 Mar 2019 19:12:25 +0000
Subject: [PATCH] IDE: less hints

git-svn-id: trunk@60753 -
---
 ide/initialsetupdlgs.pas  | 1 +
 ide/mouseactiondialog.pas | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/ide/initialsetupdlgs.pas b/ide/initialsetupdlgs.pas
index baa2930629..96b40a04bc 100644
--- a/ide/initialsetupdlgs.pas
+++ b/ide/initialsetupdlgs.pas
@@ -1673,6 +1673,7 @@ var
 {$ENDIF}
 begin
   Result := sddqCompatible;
+  Note:='';
   {$IF FPC_FULLVERSION>30100}
   FpcmkcfgExecutable := FindFPCTool('fpcmkcfg'+GetExecutableExt, EnvironmentOptions.GetParsedCompilerFilename);
   if FpcmkcfgExecutable = '' then
diff --git a/ide/mouseactiondialog.pas b/ide/mouseactiondialog.pas
index dbdb92afd4..399b59ea36 100644
--- a/ide/mouseactiondialog.pas
+++ b/ide/mouseactiondialog.pas
@@ -49,7 +49,7 @@ type
     procedure PaintBox1MouseWheel(Sender: TObject; Shift: TShiftState; WheelDelta: Integer;
       {%H-}MousePos: TPoint; var {%H-}Handled: Boolean);
     procedure PaintBox1MouseWheelHorz(Sender: TObject; Shift: TShiftState;
-      WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
+      WheelDelta: Integer; {%H-}MousePos: TPoint; var {%H-}Handled: Boolean);
   private
     FKeyMap: TKeyCommandRelationList;
     procedure AddMouseCmd(const S: string);