Index: openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl,v diff -u -N -r1.28 -r1.29 --- openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl 13 Sep 2010 17:28:44 -0000 1.28 +++ openacs-4/packages/xotcl-core/tcl/http-client-procs.tcl 7 Sep 2011 17:12:04 -0000 1.29 @@ -703,7 +703,12 @@ # this case, we do not have to perform the cond-notify. if {[my exists_status $condition] && [my get_status $condition] eq "COND_WAIT_REFRESH"} { - # Before, we had here COND_WAIT_TIMEOUT instead of + } + if {[my exists_status $condition] && + ( [my get_status $condition] eq "COND_WAIT_REFRESH" + || [my get_status $condition] eq "COND_WAIT_TIMEOUT") + } { + # Before, we had here one COND_WAIT_TIMEOUT, and once # COND_WAIT_REFRESH my set_status $condition $status $value catch {thread::cond notify $condition}