mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 20:32:41 +02:00
* Uninstall called sysinstall instead of sysuninstall
git-svn-id: trunk@8348 -
This commit is contained in:
parent
12575526da
commit
93e58304f4
@ -669,7 +669,7 @@ end;
|
|||||||
Function TCustomDaemon.UnInstall : Boolean;
|
Function TCustomDaemon.UnInstall : Boolean;
|
||||||
begin
|
begin
|
||||||
Result:=True;
|
Result:=True;
|
||||||
Application.SysInstallDaemon(Self);
|
Application.SysUnInstallDaemon(Self);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
function TCustomDaemon.HandleCustomCode(ACode: DWord): Boolean;
|
function TCustomDaemon.HandleCustomCode(ACode: DWord): Boolean;
|
||||||
|
Loading…
Reference in New Issue
Block a user