Replace CRLF to LF with all the files
[gitmo/Mouse.git] / t / 001_mouse / 056-role-combine.t
index 6ebe4e3..c195d59 100644 (file)
@@ -1,35 +1,35 @@
-#!perl\r
-use strict;\r
-use warnings;\r
-use Test::More tests => 2;\r
-use Test::Exception;\r
-{\r
-    package RoleA;\r
-    use Mouse::Role;\r
-\r
-    sub foo { }\r
-    sub bar { }\r
-}\r
-{\r
-    package RoleB;\r
-    use Mouse::Role;\r
-\r
-    sub foo { }\r
-    sub bar { }\r
-}\r
-{\r
-    package Class;\r
-    use Mouse;\r
-    use Test::More;\r
-    use Test::Exception;\r
-\r
-    throws_ok {\r
-        with qw(RoleA RoleB);\r
-    } qr/Due to method name conflicts in roles 'RoleA' and 'RoleB', the methods 'bar' and 'foo' must be/;\r
-\r
-    lives_ok {\r
-        with RoleA => { -excludes => ['foo'] },\r
-             RoleB => { -excludes => ['bar'] },\r
-        ;\r
-    };\r
-}\r
+#!perl
+use strict;
+use warnings;
+use Test::More tests => 2;
+use Test::Exception;
+{
+    package RoleA;
+    use Mouse::Role;
+
+    sub foo { }
+    sub bar { }
+}
+{
+    package RoleB;
+    use Mouse::Role;
+
+    sub foo { }
+    sub bar { }
+}
+{
+    package Class;
+    use Mouse;
+    use Test::More;
+    use Test::Exception;
+
+    throws_ok {
+        with qw(RoleA RoleB);
+    } qr/Due to method name conflicts in roles 'RoleA' and 'RoleB', the methods 'bar' and 'foo' must be/;
+
+    lives_ok {
+        with RoleA => { -excludes => ['foo'] },
+             RoleB => { -excludes => ['bar'] },
+        ;
+    };
+}