[lazarus] Patch removes some unused variables

[Luc Vigato]

Index: F:/lazarus-svn/trunk/ide/helpfpcmessages.pas
===================================================================
--- F:/lazarus-svn/trunk/ide/helpfpcmessages.pas        (revision 9183)
+++ F:/lazarus-svn/trunk/ide/helpfpcmessages.pas        (working copy)
@@ -126,7 +126,6 @@
   sl: TStringList;
   p: Integer;
   TagStart: LongInt;
-  Level: Integer;
 begin
   Result:='';
   sl:=TStringList.Create;
Index: F:/lazarus-svn/trunk/ide/helpmanager.pas
===================================================================
--- F:/lazarus-svn/trunk/ide/helpmanager.pas    (revision 9183)
+++ F:/lazarus-svn/trunk/ide/helpmanager.pas    (working copy)
@@ -452,7 +452,6 @@
   procedure FindHelpForFPCKeyWord(const KeyWord: string);
   var
     RefFilename: String;
-    sl: TStringList;
     i: Integer;
     List: TStrings;
   begin