From 9e6fc3857ea387e925b33f8e700f9cd8c2b2c8b7 Mon Sep 17 00:00:00 2001 From: mysticbbs Date: Tue, 28 Feb 2012 16:18:51 -0500 Subject: [PATCH] Cleanup --- mystic/bbs_edit_full.pas | 6 +++--- mystic/mystic.pas | 4 +--- 2 files changed, 4 insertions(+), 6 deletions(-) diff --git a/mystic/bbs_edit_full.pas b/mystic/bbs_edit_full.pas index 865a360..f60e020 100644 --- a/mystic/bbs_edit_full.pas +++ b/mystic/bbs_edit_full.pas @@ -970,8 +970,8 @@ Begin A := TotalLine; While (Session.Msgs.MsgText[A] = '') and (A > 1) Do Begin - Dec(A); - Dec(TotalLine); + Dec (A); + Dec (TotalLine); End; Lines := TotalLine; @@ -985,4 +985,4 @@ Begin Dispose (CutText[A]); End; -End. \ No newline at end of file +End. diff --git a/mystic/mystic.pas b/mystic/mystic.pas index 1e7e725..1b58f19 100644 --- a/mystic/mystic.pas +++ b/mystic/mystic.pas @@ -412,8 +412,6 @@ Begin Session.FindNextEvent; -// Session.SystemLog ('Node ' + strI2S(Session.NodeNum) + ' online'); - If Session.TimeOffset > 0 Then Session.SetTimeLeft(Session.TimeOffset) Else @@ -445,4 +443,4 @@ Begin Repeat Session.Menu.ExecuteMenu (True, True, False); Until False; -End. +End. \ No newline at end of file