Группа :: Разработка/Tcl
Пакет: expect
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: 16-logfile.patch
Скачать
Скачать
Author: n/a
Description: Corrects permissions when accessing logfiles.
--- a/exp_log.c
+++ b/exp_log.c
@@ -499,7 +499,7 @@
Tcl_DStringAppend(&tsdPtr->logFilename,filename,-1);
}
- tsdPtr->logChannel = Tcl_OpenFileChannel(interp,newfilename,mode,0777);
+ tsdPtr->logChannel = Tcl_OpenFileChannel(interp,newfilename,mode,0666);
if (!tsdPtr->logChannel) {
Tcl_DStringFree(&tsdPtr->logFilename);
return TCL_ERROR;