eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Cleanup

This commit is contained in:
mysticbbs 2012-02-28 16:18:51 -05:00
parent 6984263d14
commit 9e6fc3857e
2 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
mystic/bbs_edit_full.pas
View File

@ -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.
End.

4
mystic/mystic.pas
View File

@ -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.