From e8c5f2538f49c02e274057ce73d6ad837b1dc962 Mon Sep 17 00:00:00 2001
From: Alexey Kulakov <panda75@bk.ru>
Date: Thu, 11 Dec 2014 09:46:45 +0000
Subject: Actman 30: compilation fix

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

(limited to 'plugins/Actman30')

diff --git a/plugins/Actman30/i_options.inc b/plugins/Actman30/i_options.inc
index 539270be2d..e9c389818d 100644
--- a/plugins/Actman30/i_options.inc
+++ b/plugins/Actman30/i_options.inc
@@ -40,7 +40,7 @@ end;
 procedure SaveMacros;
 var
   Macro:pMacroRecord;
-  NumMacros:integer;
+  OldNumMacros,NumMacros:integer;
   i:integer;
   section:array [0..127] of AnsiChar;
   p,p1:PAnsiChar;
@@ -61,7 +61,7 @@ begin
     begin
       if (flags and (ACF_ASSIGNED or ACF_VOLATILE))=ACF_ASSIGNED then
       begin
-        p:=StrEnd(IntToStr(p1,NumMacro));
+        p:=StrEnd(IntToStr(p1,NumMacros));
         p^:='/'; inc(p);
 
         StrCopy(p,opt_id   ); DBWriteDWord(0,DBBranch,section,id);
@@ -83,8 +83,8 @@ begin
   // deleting old unused macro settings
   while OldNumMacros>NumMacros do
   begin
-    dec(OldNumMacro);
-    p:=IntToStr(p1,OldNumMacro);
+    dec(OldNumMacros);
+    p:=IntToStr(p1,OldNumMacros);
     DBDeleteGroup(0,DBBranch,section);
   end;
 end;
-- 
cgit v1.2.3