eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
mystic/bbs_cfg_msgbase.pas
View File

@ -32,8 +32,6 @@ Var
SortLast : Word; SortLast : Word;
SortType : Byte; SortType : Byte;
Count : Word; Count : Word;
Str : String;
Tagged : Boolean;
Begin Begin
If Not GetSortRange(List, SortFirst, SortLast) Then Exit; If Not GetSortRange(List, SortFirst, SortLast) Then Exit;
@ -164,7 +162,6 @@ Procedure Configuration_MessageBaseEditor;
Var Var
Box : TAnsiMenuBox; Box : TAnsiMenuBox;
List : TAnsiMenuList; List : TAnsiMenuList;
MIndex : LongInt;
Copied : RecMessageBase; Copied : RecMessageBase;
HasCopy : Boolean = False; HasCopy : Boolean = False;
MBaseFile : File of RecMessageBase; MBaseFile : File of RecMessageBase;

2
mystic/bbs_filebase.pas
View File

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