rpms/tcl/devel tcl-8.5.6-http.pach,NONE,1.1 tcl.spec,1.85,1.86

[Marcela Mašláňová]

Author: mmaslano

Update of /cvs/pkgs/rpms/tcl/devel
In directory cvs1.fedora.phx.redhat.com:/tmp/cvs-serv4043

Modified Files:
	tcl.spec 
Added Files:
	tcl-8.5.6-http.pach 
Log Message:
* Tue Mar 31 2009 Marcela Mašláňová <mmaslano at redhat.com> - 1:8.5.6-5
- 492541 newer http prevents connection (reproduced on amsn)



--- NEW FILE tcl-8.5.6-http.pach ---
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]} {


Index: tcl.spec
===================================================================
RCS file: /cvs/pkgs/rpms/tcl/devel/tcl.spec,v
retrieving revision 1.85
retrieving revision 1.86
diff -u -r1.85 -r1.86
--- tcl.spec	27 Feb 2009 06:23:28 -0000	1.85
+++ tcl.spec	31 Mar 2009 08:27:51 -0000	1.86
@@ -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 @@
 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 @@
 %patch0 -p1 -b .autopath
 %patch1 -p1 -b .conf
 %patch2 -p1 -b .hidden
+%patch3 -p1 -b .http
 
 %build
 pushd unix
@@ -121,10 +123,12 @@
 %{_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á <mmaslano at redhat.com> - 1:8.5.6-5
+- 492541 newer http prevents connection (reproduced on amsn)
+
 * Wed Feb 25 2009 Fedora Release Engineering <rel-eng at lists.fedoraproject.org> - 1:8.5.6-4
 - Rebuilt for https://fedoraproject.org/wiki/Fedora_11_Mass_Rebuild