diff options
| author | George Hazan <ghazan@miranda.im> | 2019-03-06 17:14:40 +0300 |
|---|---|---|
| committer | George Hazan <ghazan@miranda.im> | 2019-03-06 17:14:47 +0300 |
| commit | c09a65cb4153f151ec2eb074614b4ccfe7c22bdb (patch) | |
| tree | 171522c9a9aaf456bd68484008e7692a6b7d8361 /plugins/Watrack/lastfm | |
| parent | 000d773f687e5931699fc4de4d4b472b6325f3fb (diff) | |
popups: pascal code cleaning
Diffstat (limited to 'plugins/Watrack/lastfm')
| -rw-r--r-- | plugins/Watrack/lastfm/i_last_api.inc | 4 | ||||
| -rw-r--r-- | plugins/Watrack/lastfm/i_last_opt.inc | 4 |
2 files changed, 3 insertions, 5 deletions
diff --git a/plugins/Watrack/lastfm/i_last_api.inc b/plugins/Watrack/lastfm/i_last_api.inc index 3d58bd27dd..f8975305df 100644 --- a/plugins/Watrack/lastfm/i_last_api.inc +++ b/plugins/Watrack/lastfm/i_last_api.inc @@ -81,7 +81,7 @@ begin else if StrCmp(res,'BADAUTH' )=0 then StrCopy(tmp,Translate('Bad Auth. Check login and password'))
else if StrCmp(res,'BADTIME' )=0 then StrCopy(tmp,Translate('Bad TimeStamp'))
else if StrCmp(res,'FAILED',6)=0 then StrCopy(tmp,res+7);
- CallService(MS_POPUP_SHOWMESSAGE,wparam(@request),SM_ERROR);
+ PUShowMessage(@request,SM_ERROR);
end;
mFreeMem(res);
end;
@@ -194,7 +194,7 @@ begin else if StrCmp(res,'FAILED',6)=0 then
begin
StrCopy(StrCopyE(args,Translate('Last.fm error: ')),res+7);
- CallService(MS_POPUP_SHOWMESSAGE,wparam(@args),SM_NOTIFY);
+ PUShowMessage(@args,SM_NOTIFY);
result:=0;
end;
mFreeMem(res);
diff --git a/plugins/Watrack/lastfm/i_last_opt.inc b/plugins/Watrack/lastfm/i_last_opt.inc index c629962697..9628dcf163 100644 --- a/plugins/Watrack/lastfm/i_last_opt.inc +++ b/plugins/Watrack/lastfm/i_last_opt.inc @@ -23,9 +23,7 @@ begin mFreeMem(lfm_login ); lfm_login :=DBReadString(0,PluginShort,optLogin);
mFreeMem(lfm_password); lfm_password:=DBReadString(0,PluginShort,optPassword);
if (lfm_login=nil) or (lfm_password=nil) then
- CallService(MS_POPUP_SHOWMESSAGEW,
- wparam(TranslateW('Don''t forget to enter Login and Password to use Last.fm service')),
- SM_WARNING);
+ PUShowMessageW(TranslateW('Don''t forget to enter Login and Password to use Last.fm service'), SM_WARNING);
end;
procedure FreeOpt;
|