diff --git a/curl-7.19.7-s390-sleep.patch b/curl-7.19.7-s390-sleep.patch
new file mode 100644
index 0000000..3ddd320
--- /dev/null
+++ b/curl-7.19.7-s390-sleep.patch
@@ -0,0 +1,20 @@
+diff --git a/tests/libtest/lib513.c b/tests/libtest/lib513.c
+index b06a3c6..bf14650 100644
+--- a/tests/libtest/lib513.c
++++ b/tests/libtest/lib513.c
+@@ -12,12 +12,15 @@
+ 
+ #include "memdebug.h"
+ 
++#include <unistd.h>
++
+ static size_t read_callback(void *ptr, size_t size, size_t nmemb, void *userp)
+ {
+   (void)ptr;
+   (void)size;
+   (void)nmemb;
+   (void)userp;
++  sleep(2);
+   return CURL_READFUNC_ABORT;
+ }
+ 
diff --git a/curl.spec b/curl.spec
index 9eebc3f..7d09ff7 100644
--- a/curl.spec
+++ b/curl.spec
@@ -13,6 +13,7 @@ Patch4: curl-7.19.7-nss-warning.patch
 Patch101: curl-7.15.3-multilib.patch
 Patch102: curl-7.16.0-privlibs.patch
 Patch103: curl-7.19.4-debug.patch
+Patch104: curl-7.19.7-s390-sleep.patch
 Provides: webclient
 URL: http://curl.haxx.se/
 BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
@@ -91,6 +92,10 @@ use cURL's capabilities internally.
 %patch101 -p1
 %patch102 -p1
 %patch103 -p1
+
+# http://curl.haxx.se/mail/lib-2009-12/0031.html
+%patch104 -p1
+
 autoconf
 
 # Convert docs to UTF-8
@@ -175,8 +180,9 @@ rm -rf $RPM_BUILD_ROOT
 %{_datadir}/aclocal/libcurl.m4
 
 %changelog
-* Wed Dec 02 2009 Kamil Dudka <kdudka@redhat.com> 7.19.7-5
+* Sat Dec 05 2009 Kamil Dudka <kdudka@redhat.com> 7.19.7-5
 - avoid use of uninitialized value in lib/nss.c
+- suppress failure of test513 on s390
 
 * Tue Dec 01 2009 Kamil Dudka <kdudka@redhat.com> 7.19.7-4
 - do not require valgrind on s390 and s390x