Pascal-style type correction

Letter case correction
small fixes
Actman UA part dialog slightly changed

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

3 files changed, 4 insertions, 4 deletions

diff --git a/plugins/Watrack/popup/pop_dlg.inc b/plugins/Watrack/popup/pop_dlg.inc
index 865cf94401..2d8c0ce79b 100644
--- a/plugins/Watrack/popup/pop_dlg.inc
+++ b/plugins/Watrack/popup/pop_dlg.inc
@@ -4,7 +4,7 @@
 const

   DLGPOPUP = 'POPUP';

 

-function DlgPopupOpt(Dialog:HWnd;hMessage:Uint;wParam:WPARAM;lParam:LPARAM):LRESULT; stdcall;

+function DlgPopupOpt(Dialog:HWND;hMessage:Uint;wParam:WPARAM;lParam:LPARAM):LRESULT; stdcall;

 const

   dlginit:boolean=false;

 var

diff --git a/plugins/Watrack/popup/pop_vars.inc b/plugins/Watrack/popup/pop_vars.inc
index 4a845aaadc..2bbfce178b 100644
--- a/plugins/Watrack/popup/pop_vars.inc
+++ b/plugins/Watrack/popup/pop_vars.inc
@@ -21,7 +21,7 @@ var
   hMenuInfo   :THANDLE;

   ssmi,sic,

   plStatusHook:THANDLE;

-  PopupPresent:Bool;

+  PopupPresent:bool;

   onttbhook,

   opthook:THANDLE;

   ttbInfo:THANDLE;
\ No newline at end of file
diff --git a/plugins/Watrack/popup/popups.pas b/plugins/Watrack/popup/popups.pas
index f22a9c44bd..eda32a07ce 100644
--- a/plugins/Watrack/popup/popups.pas
+++ b/plugins/Watrack/popup/popups.pas
@@ -71,7 +71,7 @@ begin
   mFreeMem(buf);

 end;

 

-function DumbPopupDlgProc(Wnd:hwnd;msg:uint;wParam:integer;lParam:longint):integer;stdcall;

+function DumbPopupDlgProc(Wnd:HWND;msg:dword;wParam:WPARAM;lParam:LPARAM):LRESULT; stdcall;

 var

   si:pSongInfo;

   h:HBITMAP;

@@ -312,7 +312,7 @@ end;
 

 procedure regpophotkey;

 var

-  hkrec:HOTKEYDESC;

+  hkrec:THOTKEYDESC;

 begin

   if DisablePlugin=dsPermanent then

     exit;