forked from pool/expect
Accepting request 113576 from home:AndreasSchwab:ff
- Remove execute permission from logfiles OBS-URL: https://build.opensuse.org/request/show/113576 OBS-URL: https://build.opensuse.org/package/show/devel:languages:tcl/expect?expand=0&rev=11
This commit is contained in:
parent
ef966f9a9e
commit
20cfa24cf8
20
expect-log.patch
Normal file
20
expect-log.patch
Normal file
@ -0,0 +1,20 @@
|
||||
--- exp_log.c
|
||||
+++ exp_log.c
|
||||
@@ -374,7 +374,7 @@ expDiagChannelOpen(interp,filename)
|
||||
Tcl_DStringAppend(&tsdPtr->diagFilename,filename,-1);
|
||||
}
|
||||
|
||||
- tsdPtr->diagChannel = Tcl_OpenFileChannel(interp,newfilename,"a",0777);
|
||||
+ tsdPtr->diagChannel = Tcl_OpenFileChannel(interp,newfilename,"a",0666);
|
||||
if (!tsdPtr->diagChannel) {
|
||||
Tcl_DStringFree(&tsdPtr->diagFilename);
|
||||
return TCL_ERROR;
|
||||
@@ -499,7 +499,7 @@ expLogChannelOpen(interp,filename,append
|
||||
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;
|
@ -1,3 +1,8 @@
|
||||
-------------------------------------------------------------------
|
||||
Sat Apr 14 15:33:53 UTC 2012 - schwab@linux-m68k.org
|
||||
|
||||
- Remove execute permission from logfiles
|
||||
|
||||
-------------------------------------------------------------------
|
||||
Tue Dec 20 20:19:12 UTC 2011 - coolo@suse.com
|
||||
|
||||
|
@ -31,6 +31,7 @@ Source: %{name}%{version}.tar.gz
|
||||
Source1: expect-rpmlintrc
|
||||
Patch1: expect.patch
|
||||
Patch2: expect-fixes.patch
|
||||
Patch3: expect-log.patch
|
||||
|
||||
%description
|
||||
Expect is a tool primarily for automating interactive applications,
|
||||
@ -55,6 +56,7 @@ expect package loaded.
|
||||
%setup -q -n %name%version
|
||||
%patch1
|
||||
%patch2
|
||||
%patch3
|
||||
|
||||
%build
|
||||
autoreconf
|
||||
|
Loading…
Reference in New Issue
Block a user