X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F08multipart-suffix.t;h=20ae48312c9e116fd8f6218c8dc02ab1c98d63f1;hb=e0c37f8e56e19ce6a767ced61f8300891da095ff;hp=367db05f99e3e130af836031dccb6870697ccea0;hpb=180546cf674e3d5141c4b6fb34e58785ea8b101c;p=catagits%2FHTTP-Body.git

diff --git a/t/08multipart-suffix.t b/t/08multipart-suffix.t
index 367db05..20ae483 100644
--- a/t/08multipart-suffix.t
+++ b/t/08multipart-suffix.t
@@ -54,8 +54,8 @@ my $path = catdir( getcwd(), 't', 'data', 'multipart' );
         'tempname preserves .txt suffix when dir name has .'
     );
 
-    unlike(
-        $uploads->{upload2}{tempname}, qr/\\/,
+    like(
+        $uploads->{upload2}{tempname}, qr/[\\\/]\w+.txt$/,
         'tempname only gets extension from filename, not from a directory name'
     );
 }