X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FFile%2FSpec%2FWin32.pm;h=3af8bcf38a4596994607e5e49aedadca5c34fad6;hb=99804bbbf0b24ddc3b565419ea53f59e7410d1f4;hp=034a0cbc2e69947d0534a98c468bb2f5b24fb40d;hpb=beed81117712f7512341eefdf74a027ce5d0e806;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/File/Spec/Win32.pm b/lib/File/Spec/Win32.pm
index 034a0cb..3af8bcf 100644
--- a/lib/File/Spec/Win32.pm
+++ b/lib/File/Spec/Win32.pm
@@ -66,6 +66,10 @@ sub catfile {
     return $dir.$file;
 }
 
+sub devnull {
+    return "nul";
+}
+
 sub path {
     local $^W = 1;
     my($self) = @_;