From 5f44e985604d141ea23c77844747ae95924043b2 Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Thu, 17 Jan 2013 17:12:06 -0500
Subject: [PATCH] Code cleanup

---
 mystic/bbs_msgbase.pas | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/mystic/bbs_msgbase.pas b/mystic/bbs_msgbase.pas
index e90b8b8..2e70ba3 100644
--- a/mystic/bbs_msgbase.pas
+++ b/mystic/bbs_msgbase.pas
@@ -3877,18 +3877,21 @@ Begin
 
     If Not Session.FileBase.DszSearch(Config.qwkBBSID + '.rep') Then Begin
       Session.io.PromptInfo[1] := Config.qwkBBSID + '.rep';
+
       Session.io.OutFullLn (Session.GetPrompt(84));
+
       Exit;
     End;
 
     Session.FileBase.ExecuteArchive (Session.TempPath + Config.qwkBBSID + '.rep', Session.User.ThisUser.Archive, '*', 2)
   End;
 
-  Assign (DataFile, Session.TempPath + Config.qwkBBSID + '.msg');
+  Assign (DataFile, FileFind(Session.TempPath + Config.qwkBBSID + '.msg'));
   {$I-} Reset (DataFile, 1); {$I+}
+
   If IoResult <> 0 Then Begin
     Session.io.OutFull (Session.GetPrompt(238));
-    DirClean(Session.TempPath, '');
+    DirClean (Session.TempPath, '');
     Exit;
   End;