LogoopenSUSE Build Service > Projects
Sign Up | Log In

View File expect-5.43.0-log_file.patch of Package expect (Project home:non7top:epel5)

--- expect-5.43/exp_log.c.log_file	2004-08-18 16:54:35.000000000 -0400
+++ expect-5.43/exp_log.c	2006-02-24 12:39:58.000000000 -0500
@@ -471,7 +471,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;