summaryrefslogtreecommitdiff
path: root/plugins/Watrack/status/status.pas
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/Watrack/status/status.pas')
-rw-r--r--plugins/Watrack/status/status.pas5
1 files changed, 4 insertions, 1 deletions
diff --git a/plugins/Watrack/status/status.pas b/plugins/Watrack/status/status.pas
index ccc9b2a447..1ffbeb6b84 100644
--- a/plugins/Watrack/status/status.pas
+++ b/plugins/Watrack/status/status.pas
@@ -66,7 +66,8 @@ begin
CreateTemplates;
hINS:=CreateServiceFunction(MS_WAT_INSERT,@InsertProc);
reghotkey;
- HookEvent(ME_WAT_NEWSTATUS,@NewPlStatus);
+ plStatusHook:=HookEvent(ME_WAT_NEWSTATUS,@NewPlStatus);
+
end;
procedure DeInitProc(aSetDisable:boolean);
@@ -83,6 +84,7 @@ begin
end;
// DestroyServiceFunction(hLTo);
DestroyServiceFunction(hINS);
+ UnhookEvent(plStatusHook);
FreeProtoList;
FreeTemplates;
@@ -126,6 +128,7 @@ begin
mStatus.Init :=@InitProc;
mStatus.DeInit :=@DeInitProc;
mStatus.AddOption :=@AddOptionsPage;
+ mStatus.Check :=nil;
mStatus.ModuleName:='Statuses';
ModuleLink :=@mStatus;
end;