pascal units: [de]capitalization

Actman 30: small-small fix

git-svn-id: http://svn.miranda-ng.org/main/trunk@11439 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c

1 files changed, 7 insertions, 7 deletions

diff --git a/plugins/Utils.pas/protocols.pas b/plugins/Utils.pas/protocols.pas
index c311cb8936..598d02ba50 100644
--- a/plugins/Utils.pas/protocols.pas
+++ b/plugins/Utils.pas/protocols.pas
@@ -218,7 +218,7 @@ procedure FillProtoList(list:HWND;withIcons:bool=false);
 var

   item:TLVITEMW;

   lvc:TLVCOLUMN;

-  i,NewItem:integer;

+  i,newItem:integer;

   cli:PCLIST_INTERFACE;

 begin

   FillChar(lvc,SizeOf(lvc),0);

@@ -280,7 +280,7 @@ procedure FillStatusList(proto:uint_ptr;list:HWND;withIcons:bool=false);
   procedure AddString(num:integer;enabled:boolean;cli:PCLIST_INTERFACE);

   var

     item:LV_ITEMW;

-    NewItem:integer;

+    newItem:integer;

   begin

     FillChar(item,SizeOf(item),0);

     item.iItem  :=num;

@@ -373,14 +373,14 @@ procedure CheckStatusList(list:HWND;ProtoNum:uint_ptr);
 

 var

   i:integer;

-  Item:TLVITEM;

+  item:TLVITEM;

 begin

   for i:=1 to ListView_GetItemCount(list)-1 do //skip default

   begin

-    Item.iItem:=i;

-    Item.mask:=LVIF_PARAM;

-    ListView_GetItem(list,Item);

-    SetStatusMask(Item.lParam,ListView_GetCheckState(list,i)=BST_CHECKED)

+    item.iItem:=i;

+    item.mask:=LVIF_PARAM;

+    ListView_GetItem(list,item);

+    SetStatusMask(item.lParam,ListView_GetCheckState(list,i)=BST_CHECKED)

   end;

 end;