Changeset 22256 for lang/perl/GD-Tab-Guitar

Timestamp:

10/28/08 09:51:33 (5 years ago)

Author:

nipotan

Message:

fixed bug occurs under perl for MSWin32

Location:

lang/perl/GD-Tab-Guitar/trunk

Files:

• Changes (modified) (2 diffs)
• lib/GD/Tab/Guitar.pm (modified) (1 diff)
• t/01_methods.t (modified) (1 diff)

lang/perl/GD-Tab-Guitar/trunk/Changes

@@ -1 +1 @@
 Revision history for GD-Tab-Guitar
+
+0.03 Tue Oct 28 09:29:44 2008
+     - applied a patch to t/01_method.t for MSWin32 environment (#40408).
+       thanks to Taro Nishino.
 
 0.02 Sat Oct 25 13:19:00 2008
@@ -5 +9 @@
        Test::Spelling, Test::Perl::Critic and Test::Pod to xt directory
        to avoid test failures.
-       was adoviced by tokuhirom on Wassr.
+       was adviced by tokuhirom on Wassr.
 
 0.01 Fri Oct 24 14:03:09 2008

lang/perl/GD-Tab-Guitar/trunk/lib/GD/Tab/Guitar.pm

@@ -9 +9 @@
 __PACKAGE__->mk_accessors(qw(bgcolor color interlaced));
 
-our $VERSION = '0.02';
+our $VERSION = '0.03';
 my @lines = (
     [5,15,46,15],

lang/perl/GD-Tab-Guitar/trunk/t/01_methods.t

@@ -22 +22 @@
 sub fileread {
     my $fh = IO::File->new(shift, 'r');
+    $fh->binmode();
     return do {local $/ = undef; <$fh>};
 }