diff options
Diffstat (limited to 'plugins/HistoryPlusPlus/hpp_services.pas')
-rw-r--r-- | plugins/HistoryPlusPlus/hpp_services.pas | 16 |
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);
|