Commits

shl...@52c325ad-5fd0-0310-8a0f-c43feede02cc  committed de72342

Fix the tests on MSWin32.

  • Participants
  • Parent commits 920fce9
  • Tags File-Find-Object-Rule-MMagic/releases/0.0.2

Comments (0)

Files changed (4)

File File-Find-Object-Rule-MMagic/Changes

+0.0.2   Fri Mar 26 15:50:34 IDT 2010
+    - Fixed t/File-Find-Object-Rule-MMagic.t on MSWin32 (used File::Spec).
+
 0.0.1   Mon Jul  6 12:29:12 IDT 2009
     - Derived from File-Find-Rule-MMagic 0.02.
 

File File-Find-Object-Rule-MMagic/MANIFEST.SKIP

 \.svn
 ^Makefile$
 ~$
+^MYMETA.yml$

File File-Find-Object-Rule-MMagic/lib/File/Find/Object/Rule/MMagic.pm

 use base qw( File::Find::Object::Rule );
 use vars qw( $VERSION @EXPORT );
 @EXPORT  = @File::Find::Object::Rule::EXPORT;
-$VERSION = '0.0.1';
+$VERSION = '0.0.2';
 
 use File::MMagic;
 use Text::Glob qw(glob_to_regex);

File File-Find-Object-Rule-MMagic/t/File-Find-Object-Rule-MMagic.t

 use Test::More tests => 1;
 
 use File::Find::Object::Rule::MMagic;
+use File::Spec;
+
 # TEST
 is_deeply( [ find( magic => 'image/*', maxdepth => 2, in => 't' ) ],
-           [ 't/happy-baby.JPG' ] );
+           [ File::Spec->catfile(File::Spec->curdir(), "t", "happy-baby.JPG")]
+           );