--- Module-Build-0.4212/inc/Perl/OSType.pm.orig	2015-06-04 21:58:23.327600000 +0300
+++ Module-Build-0.4212/inc/Perl/OSType.pm	2015-06-04 21:58:59.656800000 +0300
@@ -54,6 +54,7 @@
   solaris     Unix
   sunos       Unix
   cygwin      Unix
+  msys        Unix
   os2         Unix
   interix     Unix
   gnu         Unix
--- Module-Build-0.4212/t/destinations.t.orig	2015-06-04 22:00:03.432200000 +0300
+++ Module-Build-0.4212/t/destinations.t	2015-06-04 22:00:48.656600000 +0300
@@ -300,11 +300,11 @@
 sub have_same_ending {
   my ($dir1, $dir2, $message) = @_;
 
-  $dir1 =~ s{/$}{} if $^O eq 'cygwin'; # remove any trailing slash
+  $dir1 =~ s{/$}{} if $^O eq 'cygwin' || $^O eq 'msys'; # remove any trailing slash
   my (undef, $dirs1, undef) = splitpath $dir1;
   my @dir1 = splitdir $dirs1;
 
-  $dir2 =~ s{/$}{} if $^O eq 'cygwin'; # remove any trailing slash
+  $dir2 =~ s{/$}{} if $^O eq 'cygwin' || $^O eq 'msys'; # remove any trailing slash
   my (undef, $dirs2, undef) = splitpath $dir2;
   my @dir2 = splitdir $dirs2;