diff --git a/mystic/bbs_cfg_msgbase.pas b/mystic/bbs_cfg_msgbase.pas
index 0a34993..bfb580d 100644
--- a/mystic/bbs_cfg_msgbase.pas
+++ b/mystic/bbs_cfg_msgbase.pas
@@ -32,8 +32,6 @@ Var
   SortLast  : Word;
   SortType  : Byte;
   Count     : Word;
-  Str       : String;
-  Tagged    : Boolean;
 Begin
   If Not GetSortRange(List, SortFirst, SortLast) Then Exit;
 
@@ -164,7 +162,6 @@ Procedure Configuration_MessageBaseEditor;
 Var
   Box       : TAnsiMenuBox;
   List      : TAnsiMenuList;
-  MIndex    : LongInt;
   Copied    : RecMessageBase;
   HasCopy   : Boolean = False;
   MBaseFile : File of RecMessageBase;
diff --git a/mystic/bbs_filebase.pas b/mystic/bbs_filebase.pas
index bca5823..1c053d8 100644
--- a/mystic/bbs_filebase.pas
+++ b/mystic/bbs_filebase.pas
@@ -3818,4 +3818,4 @@ Begin
   FBase := Old;
 End;
 
-End.
+End.
\ No newline at end of file