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

Updated copyright

This commit is contained in:
mysticbbs 2012-02-18 01:52:42 -05:00
parent 13a99d4615
commit e12a159b20
1 changed files with 5 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
mystic/mbbsutil.pas
View File

@ -363,11 +363,10 @@ Begin
FindNext(Dir);
End;
{$IFNDEF MSDOS}
FindClose(Dir);
{$ENDIF}
FindClose(Dir);
Update_Status ('Completed');
WriteLn;
End;
@ -444,9 +443,7 @@ Begin
FindNext(Dir);
End;
{$IFNDEF MSDOS}
FindClose(Dir);
{$ENDIF}
FindClose(Dir);
End Else
SortList;
@ -507,9 +504,7 @@ Begin
FindNext(Dir);
End;
{$IFNDEF MSDOS}
FindClose(Dir);
{$ENDIF}
FindClose(Dir);
End Else
PackFile;
@ -839,7 +834,7 @@ Begin
TextAttr := 7;
WriteLn;
WriteLn ('MBBSUTIL: ', mysSoftwareID, ' BBS Utilities Version ', mysVersion, ' (', OSID, ')');
WriteLn ('Copyright (C) 1997-2011 By James Coyle. All Rights Reserved.');
WriteLn ('Copyright (C) 1997-2012 By James Coyle. All Rights Reserved.');
WriteLn;
FileMode := 66;