summaryrefslogtreecommitdiff
path: root/plugins/HistoryPlusPlus/hpp_services.pas
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/HistoryPlusPlus/hpp_services.pas')
-rw-r--r--plugins/HistoryPlusPlus/hpp_services.pas16
1 files changed, 0 insertions, 16 deletions
diff --git a/plugins/HistoryPlusPlus/hpp_services.pas b/plugins/HistoryPlusPlus/hpp_services.pas
index 4ee1d5c161..ba4be43229 100644
--- a/plugins/HistoryPlusPlus/hpp_services.pas
+++ b/plugins/HistoryPlusPlus/hpp_services.pas
@@ -202,27 +202,11 @@ begin
Result := 0;
end;
-// MS_HPP_EMPTYHISTORY service
-// See m_historypp.inc for details
-function HppEmptyHistory(wParam { hContact } : WPARAM; lParam { 0 } : LPARAM): uint_ptr; cdecl;
-var
- wHistory: THistoryFrm;
-begin
- wHistory := FindContactWindow(wParam);
- with TEmptyHistoryFrm.Create(wHistory) do
- begin
- Contact := wParam;
- Result := int_ptr(ShowModal = mrYes);
- Free;
- end;
-end;
-
procedure hppRegisterServices;
begin
HstWindowList := TList.Create;
CreateServiceFunction(MS_HISTORY_SHOWCONTACTHISTORY,@HppShowHistory);
- CreateServiceFunction(MS_HPP_EMPTYHISTORY, @HppEmptyHistory);
CreateServiceFunction(MS_HPP_GETVERSION, @HppGetVersion);
CreateServiceFunction(MS_HPP_SHOWGLOBALSEARCH,@HppShowGlobalSearch);
CreateServiceFunction(MS_HPP_OPENHISTORYEVENT,@HppOpenHistoryEvent);