diff --git a/mystic/bbs_msgbase.pas b/mystic/bbs_msgbase.pas
index 78cfa0b..8bae139 100644
--- a/mystic/bbs_msgbase.pas
+++ b/mystic/bbs_msgbase.pas
@@ -2497,7 +2497,7 @@ Begin
       Inc (Session.User.ThisUser.Emails);
       Inc (Session.HistoryEmails);
 
-      A := Is_User_Online(MsgTo);
+      A := IsUserOnline(MsgTo);
 
       If A <> 0 Then Begin
         TempStr := Session.GetPrompt(465);