From a8cd9774e9747b2dfde3354bbab80c82593b1d7c Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Fri, 20 Apr 2012 01:31:47 -0400
Subject: [PATCH] Whos online node shows inactive nodes again.

---
 mystic/bbs_nodeinfo.pas | 14 ++++++++------
 1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/mystic/bbs_nodeinfo.pas b/mystic/bbs_nodeinfo.pas
index 35fd073..426b0c1 100644
--- a/mystic/bbs_nodeinfo.pas
+++ b/mystic/bbs_nodeinfo.pas
@@ -95,17 +95,22 @@ Begin
   Session.io.OutFullLn (Session.GetPrompt(138));
 
   For Count := 1 to Config.INetTNNodes Do Begin
+    Session.io.PromptInfo[1] := strI2S(Count);
+
     Assign (ChatFile, Config.DataPath + 'chat' + strI2S(Count) + '.dat');
 
     {$I-} Reset(ChatFile); {$I+}
 
-    If IoResult <> 0 Then Continue;
+    If IoResult <> 0 Then Begin
+      Session.io.OutFullLn (Session.GetPrompt(268));
+
+      Continue;
+    End;
 
     Read  (ChatFile, TChat);
     Close (ChatFile);
 
     If TChat.Active and ((Not TChat.Invisible) or (TChat.Invisible and Session.User.Access(Config.AcsSeeInvis))) Then Begin
-      Session.io.PromptInfo[1] := strI2S(Count);
       Session.io.PromptInfo[2] := TChat.Name;
       Session.io.PromptInfo[3] := TChat.Action;
       Session.io.PromptInfo[4] := TChat.Location;
@@ -115,11 +120,8 @@ Begin
       Session.io.PromptInfo[8] := Session.io.OutYN(TChat.Available);
 
       Session.io.OutFullLn (Session.GetPrompt(139));
-    End Else Begin
-      Session.io.PromptInfo[1] := strI2S(Count);
-
+    End Else
       Session.io.OutFullLn (Session.GetPrompt(268));
-    End;
   End;
 
   Session.io.OutFull (Session.GetPrompt(140));