From 0ebb1294ecaf4d62ad6b3e911be6275248c05354 Mon Sep 17 00:00:00 2001
From: George Hazan <ghazan@miranda.im>
Date: Sun, 27 Nov 2016 21:02:54 +0300
Subject: correct type for ServiceExists() - bool

---
 include/delphi/m_core.inc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'include/delphi/m_core.inc')

diff --git a/include/delphi/m_core.inc b/include/delphi/m_core.inc
index 7f9d6a3ec2..3428109f97 100644
--- a/include/delphi/m_core.inc
+++ b/include/delphi/m_core.inc
@@ -126,7 +126,7 @@ function CreateServiceFunctionObjParam(const name:PAnsiChar; serviceProc:TMIRAND
                  external CoreDLL name 'CreateServiceFunctionObjParam';
 function DestroyServiceFunction(hService:THANDLE):int; stdcall;
                  external CoreDLL name 'DestroyServiceFunction';
-function ServiceExists(const name:PAnsiChar):int; stdcall;
+function ServiceExists(const name:PAnsiChar):byteBool; stdcall;
                  external CoreDLL name 'ServiceExists';
 
 function CallService(const name:PAnsiChar; wParam:WPARAM; lParam:LPARAM):int_ptr; stdcall;
-- 
cgit v1.2.3