windows build fix

This commit is contained in:
Joey Hess 2015-01-29 13:46:57 -04:00
parent 5fe41d3ef5
commit 1af8107fec

View file

@ -44,5 +44,5 @@ rsyncUrls o k = map use dirHashes
#ifndef mingw32_HOST_OS
hash h = h def k
#else
hash h = replace "\\" "/" (h k)
hash h = replace "\\" "/" (h def k)
#endif