@@ -353,11 +353,12 @@
 					   fullurl 
 					   (list (cons 'key "thekey")
 						 (cons 'cmd cmd)
 						 (cons 'params params))
 					   read-string))
-				(close-all-connections)
+				 ;; Shouldn't this be a call to the managed call-all-connections stuff above?
+				(close-all-connections!)
 				(mutex-unlock! *http-mutex*)
 				))
 	                          ;; (if cleanup
 				  ;;   ;; mutex already set
 				  ;;   (begin