From af6df73fa586af764cd065fdef9d6b1a4cc82473 Mon Sep 17 00:00:00 2001 From: mysticbbs Date: Sun, 23 Sep 2012 00:59:33 -0400 Subject: [PATCH] Code formatting --- mystic/bbs_core.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/mystic/bbs_core.pas b/mystic/bbs_core.pas index 4856299..73e83d4 100644 --- a/mystic/bbs_core.pas +++ b/mystic/bbs_core.pas @@ -186,6 +186,7 @@ Begin If Eof(HistoryFile) Then Begin FillChar(History, SizeOf(History), 0); + History.Date := CurDateDos; End; @@ -199,7 +200,7 @@ Begin If Not LocalMode And (User.ThisUser.Flags AND UserNoLastCall = 0) Then Inc (History.Calls, 1); - If User.ThisUser.Calls = 1 Then Inc (History.NewUsers, 1); + If User.ThisUser.Calls = 1 Then Inc (History.NewUsers); If Not LocalMode Then Inc (History.Hourly[HistoryHour]);