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

Minor formatting

This commit is contained in:
mysticbbs 2012-06-30 23:59:38 -04:00
parent 9490f24bab
commit 0de9a68569
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
mystic/mystic.pas
View File

@ -408,13 +408,13 @@ Begin
CheckPathsAndDataFiles;
{$IFNDEF UNIX}
Session.LocalMode := Session.CommHandle = -1;
Session.LocalMode := Session.CommHandle = -1;
If Not Session.LocalMode Then Begin
Session.Client.FSocketHandle := Session.CommHandle;
If Not Session.LocalMode Then Begin
Session.Client.FSocketHandle := Session.CommHandle;
Session.io.LocalScreenDisable;
End;
Session.io.LocalScreenDisable;
End;
{$ENDIF}
ExitSave := ExitProc;
@ -440,12 +440,12 @@ Begin
If Session.Baud = -1 Then Session.Baud := 0;
{$IFNDEF UNIX}
Screen.TextAttr := 7;
Screen.ClearScreen;
Screen.TextAttr := 7;
Screen.ClearScreen;
{$ENDIF}
{$IFNDEF UNIX}
UpdateStatusLine(0, '');
UpdateStatusLine(0, '');
{$ENDIF}
Set_Node_Action (Session.GetPrompt(345));