Function rename

This commit is contained in:
mysticbbs 2012-03-10 03:53:27 -05:00
parent e81b383736
commit ed9529c818
1 changed files with 1 additions and 1 deletions

View File

@ -2497,7 +2497,7 @@ Begin
Inc (Session.User.ThisUser.Emails); Inc (Session.User.ThisUser.Emails);
Inc (Session.HistoryEmails); Inc (Session.HistoryEmails);
A := Is_User_Online(MsgTo); A := IsUserOnline(MsgTo);
If A <> 0 Then Begin If A <> 0 Then Begin
TempStr := Session.GetPrompt(465); TempStr := Session.GetPrompt(465);