From 4a0e4dde3b293d027b92399e6cd0a4b3861849e0 Mon Sep 17 00:00:00 2001 From: Wizzup? Date: Thu, 7 Jan 2010 18:58:00 +0000 Subject: [PATCH] Fix bug #21. git-svn-id: http://www.villavu.com/repositories/merlijn/mufasa@380 3f818213-9676-44b0-a9b4-5e4c4e03d09d --- Units/MMLAddon/updater.pas | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/Units/MMLAddon/updater.pas b/Units/MMLAddon/updater.pas index 576d44c..fdfd114 100644 --- a/Units/MMLAddon/updater.pas +++ b/Units/MMLAddon/updater.pas @@ -7,7 +7,7 @@ interface uses Classes, SysUtils, httpsend,blcksock {$IFDEF LINUX} - ,unixutils // for chmod + ,BaseUnix {$ENDIF}; type @@ -219,7 +219,8 @@ begin RenameFile(FBasePath + FReplacementFile +'_', FBasePath + FReplacementFile); DeleteFile(FBasePath + FReplacementFile+'_old_'); {$IFDEF LINUX} - Chmod(FBasePath + FReplacementFile, PermissionBits[0] or PermissionBits[1] or PermissionBits[2]); + fpchmod(FBasePath + FReplacementFile, S_IRUSR or S_IWUSR or S_IXUSR or S_IRGRP + or S_IXGRP or S_IROTH or S_IXOTH); {$ENDIF} end;