From 40f83d17276b73f54459e032df75dbdd09c2989d Mon Sep 17 00:00:00 2001
From: mysticbbs <mysticbbs@gmail.com>
Date: Fri, 8 Mar 2013 09:01:57 -0500
Subject: [PATCH] Bugfix

---
 mystic/mutil_importmsgbase.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/mystic/mutil_importmsgbase.pas b/mystic/mutil_importmsgbase.pas
index afdbcaa..12c1401 100644
--- a/mystic/mutil_importmsgbase.pas
+++ b/mystic/mutil_importmsgbase.pas
@@ -34,7 +34,7 @@ Begin
     BaseName := JustFileName(Info.Name);
     BaseExt  := strUpper(JustFileExt(Info.Name));
 
-    If ((BaseExt = 'JHR') or (BaseExt = 'SQD')) And Not IsDupeMBase(BaseName) Then Begin
+    If ((BaseExt = 'JHR') or (BaseExt = 'SQD')) And (BaseName <> '') And Not IsDupeMBase(BaseName) Then Begin
       ProcessStatus (BaseName, False);
 
       FillChar (MBase, SizeOf(MBase), #0);