From 7d8860bd3d4e4777ac813c7a0b6efbfdbd5adcc1 Mon Sep 17 00:00:00 2001
From: Alexey Kulakov <panda75@bk.ru>
Date: Thu, 11 Dec 2014 17:38:57 +0000
Subject: Actman 30: style fix

git-svn-id: http://svn.miranda-ng.org/main/trunk@11333 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/Actman30/i_options.inc | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'plugins/Actman30/i_options.inc')

diff --git a/plugins/Actman30/i_options.inc b/plugins/Actman30/i_options.inc
index 3d8393a3e0..248f9f0c79 100644
--- a/plugins/Actman30/i_options.inc
+++ b/plugins/Actman30/i_options.inc
@@ -84,7 +84,7 @@ begin
   while OldNumMacros>NumMacros do
   begin
     dec(OldNumMacros);
-    p:=IntToStr(p1,OldNumMacros);
+    IntToStr(p1,OldNumMacros);
     DBDeleteGroup(0,DBBranch,section);
   end;
 end;
@@ -411,6 +411,7 @@ var
   v2:bool;
 begin
   NumMacros:=DBReadWord(0,DBBranch,opt_nummacro,0);
+  v2:=false;
 
   // Check if old actman version used
   if NumMacros>0 then
@@ -422,7 +423,6 @@ begin
     begin
       if MessageBoxW(0,TranslateW(OldVersion),'Actman',MB_OKCANCEL or MB_ICONWARNING)<>IDOK then
       begin
-        NumMacros:=0;
         MacroList:=tMacroList.Create(0);
         exit;
       end;
-- 
cgit v1.2.3