code cleanup

This commit is contained in:
mysticbbs 2013-02-17 00:34:20 -05:00
parent c396b5f416
commit 7bc3718b52
2 changed files with 1 additions and 4 deletions

View File

@ -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;

View File

@ -3818,4 +3818,4 @@ Begin
FBase := Old;
End;
End.
End.