more restrictive test naming

[sbcl.git] / tests / stream.impure.lisp

diff --git a/tests/stream.impure.lisp b/tests/stream.impure.lisp
index 6e63ceb..8d0fc37 100644 (file)
--- a/tests/stream.impure.lisp
+++ b/tests/stream.impure.lisp
@@ -132,7 +132,7 @@
 
 ;;; CLOSING a non-new streams should not delete them, and superseded
 ;;; files should be restored.
-(with-test (:name test-file-for-close-should-not-delete :fails-on :win32)
+(with-test (:name :test-file-for-close-should-not-delete :fails-on :win32)
   (let ((test "test-file-for-close-should-not-delete"))
     (macrolet ((test-mode (mode)
                           `(progn