From 20cfa24cf88c9a338f9b1c4bf676cc2b6d065bb6d7419c6dcbeaef68585aea9b Mon Sep 17 00:00:00 2001 From: Factory Maintainer Date: Tue, 17 Apr 2012 19:19:47 +0000 Subject: [PATCH] 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 --- expect-log.patch | 20 ++++++++++++++++++++ expect.changes | 5 +++++ expect.spec | 2 ++ 3 files changed, 27 insertions(+) create mode 100644 expect-log.patch diff --git a/expect-log.patch b/expect-log.patch new file mode 100644 index 0000000..0f6c098 --- /dev/null +++ b/expect-log.patch @@ -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; diff --git a/expect.changes b/expect.changes index f11e36e..c13f0dc 100644 --- a/expect.changes +++ b/expect.changes @@ -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 diff --git a/expect.spec b/expect.spec index 057b026..8f3f536 100644 --- a/expect.spec +++ b/expect.spec @@ -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