- disable test that tries to mess with /dev/log

diff --git a/sbcl-tests.patch b/sbcl-tests.patch
new file mode 100644 (file)
index 0000000..3ac5779
--- /dev/null
+++ b/sbcl-tests.patch
@@ -0,0 +1,11 @@
+--- sbcl-1.1.6/contrib/sb-bsd-sockets/tests.lisp~      2013-03-29 20:38:41.000000000 +0100
++++ sbcl-1.1.6/contrib/sb-bsd-sockets/tests.lisp       2013-04-26 13:07:32.325668837 +0200
+@@ -191,7 +191,7 @@
+                                 (declare (ignore e))
+                                 (return nil))))
+                 (sb-posix:s-issock
+-                 (sb-posix::stat-mode (sb-posix:stat "/dev/log")))))
++                 (sb-posix::stat-mode (sb-posix:stat "/dev/log-dont-touch-that")))))
+         (let ((s (make-instance 'local-socket :type :datagram)))
+           (format t "Connecting ~A... " s)
+           (finish-output)

diff --git a/sbcl.spec b/sbcl.spec
index 667ab8b7b6d11805ee40dbf661a774dd796f2911..8cd3e4c4b403b9279fa7242dcb83325e742e9315 100644 (file)
--- a/sbcl.spec
+++ b/sbcl.spec
@@ -19,6 +19,7 @@ Source10:     http://download.sourceforge.net/sbcl/sbcl-1.0.58-x86-linux-binary.tar.
 # Source10-md5:        28104cfb0ee2ac67000c77b9518377e8
 Source11:      http://download.sourceforge.net/sbcl/sbcl-1.0.58-x86-64-linux-binary.tar.bz2
 # Source11-md5:        3d02edfdc851904d1d8dafeec20d1d06
+Patch0:                %{name}-tests.patch
 Patch1:                %{name}-threads.patch
 URL:           http://sbcl.sourceforge.net/
 %{?with_clisp:BuildRequires:   clisp}
@@ -78,6 +79,7 @@ Dokumentacja Steel Bank Common Lisp (SBCL) w formacie PDF.
 %ifarch %{x8664}
 %setup -q -a 11
 %endif
+%patch0 -p1
 %ifarch %{ix86} %{x8664}
 %patch1 -p1
 %endif