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

FileMode 66 just in case

This commit is contained in:
mysticbbs 2012-09-08 04:26:31 -04:00
parent 42b86940ae
commit 91e3286d7f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
mystic/mbbsutil.pas
View File

@ -540,6 +540,8 @@ Var
UserFile : File of RecUser; UserFile : File of RecUser;
User : RecUser; User : RecUser;
Begin Begin
FileMode := 66;
Write ('Killing User File :'); Write ('Killing User File :');
If FileRename (Config.DataPath + 'users.dat', Config.DataPath + 'users.dab') Then Begin If FileRename (Config.DataPath + 'users.dat', Config.DataPath + 'users.dab') Then Begin