diff --git a/tcl-8.5.6-http.pach b/tcl-8.5.6-http.pach new file mode 100644 index 0000000..59d41c3 --- /dev/null +++ b/tcl-8.5.6-http.pach @@ -0,0 +1,12 @@ +diff -up tcl8.5.6/library/http/http.tcl.old tcl8.5.6/library/http/http.tcl +--- tcl8.5.6/library/http/http.tcl.old 2008-10-24 01:34:32.000000000 +0200 ++++ tcl8.5.6/library/http/http.tcl 2009-03-31 09:19:44.000000000 +0200 +@@ -946,6 +946,8 @@ proc http::Event {sock token} { + set state(state) "header" + if {[catch {gets $sock state(http)} n]} { + return [Finish $token $n] ++ } elseif {$n >= 0} { ++ set state(state) "header" + } + } elseif {$state(state) eq "header"} { + if {[catch {gets $sock line} n]} { diff --git a/tcl.spec b/tcl.spec index 0c0abda..f8a3f55 100644 --- a/tcl.spec +++ b/tcl.spec @@ -1,10 +1,10 @@ -%define majorver 8.6 -%define vers %{majorver}b1 +%define majorver 8.5 +%define vers %{majorver}.6 Summary: Tool Command Language, pronounced tickle Name: tcl Version: %{vers} -Release: 4%{?dist} +Release: 5%{?dist} Epoch: 1 License: TCL Group: Development/Languages @@ -18,6 +18,7 @@ Provides: tcl-tcldict = %{vers} Patch0: tcl-8.5.1-autopath.patch Patch1: tcl-8.5.0-conf.patch Patch2: tcl-8.5.0-hidden.patch +Patch3: tcl-8.5.6-http.pach %description The Tcl (Tool Command Language) provides a powerful platform for @@ -51,6 +52,7 @@ chmod -x generic/tclThreadAlloc.c %patch0 -p1 -b .autopath %patch1 -p1 -b .conf %patch2 -p1 -b .hidden +%patch3 -p1 -b .http %build pushd unix @@ -121,10 +123,12 @@ rm -rf $RPM_BUILD_ROOT %{_libdir}/lib%{name}stub%{majorver}.a %{_libdir}/lib%{name}.so %{_libdir}/%{name}Config.sh -%{_libdir}/%{name}8.6/%{name}Config.sh -%{_libdir}/tdbc1.0b1/* +%{_libdir}/%{name}8.5/%{name}Config.sh %changelog +* Tue Mar 31 2009 Marcela Mašláňová - 1:8.5.6-5 +- 492541 newer http prevents connection (reproduced on amsn) + * Wed Feb 25 2009 Fedora Release Engineering - 1:8.5.6-4 - Rebuilt for https://fedoraproject.org/wiki/Fedora_11_Mass_Rebuild