Permalink
Browse files

fix tests more firmly

  • Loading branch information...
1 parent 2e341b9 commit 49c8a28cf6d412b7f4c172336f88465e8c08a888 Hans Dieter Pearcey committed Jun 1, 2009
Showing with 10 additions and 6 deletions.
  1. +4 −0 Changes
  2. +1 −1 README
  3. +2 −2 lib/Git/Wrapper.pm
  4. +3 −3 t/basic.t
View
@@ -1,5 +1,9 @@
Revision history for Git-Wrapper
+0.006 2009-06-01
+
+ fix tests more firmly
+
0.005 2009-05-28
change tests to pass on git 1.6
View
2 README
@@ -1,4 +1,4 @@
-Git-Wrapper 0.005
+Git-Wrapper 0.006
INSTALLATION
View
@@ -3,7 +3,7 @@ use warnings;
package Git::Wrapper;
-our $VERSION = '0.005';
+our $VERSION = '0.006';
use IPC::Open3 () ;
use Symbol;
use File::pushd;
@@ -167,7 +167,7 @@ Git::Wrapper - wrap git(7) command-line interface
=head1 VERSION
- Version 0.005
+ Version 0.006
=head1 SYNOPSIS
View
@@ -33,7 +33,6 @@ is_deeply(
my $time = time;
$git->commit({ message => "FIRST" });
-my $date = strftime("%a %b %d %H:%M:%S %Y %z", localtime($time));
my @rev_list =
$git->rev_list({ all => 1, pretty => 'oneline' });
@@ -45,10 +44,11 @@ ok(my $e = $@, "got an error");
if ($git->version ge '1.6') {
like($e, qr/which does not exist/);
} else {
- like($e, qr/'no-such-command' is not a git-command/);
+ like($e, qr/is not a git-command/);
}
-my @log = $git->log;
+my $date = strftime("%Y-%m-%d %H:%M:%S %z", localtime($time));
+my @log = $git->log({ date => 'iso' });
is(@log, 1, 'one log entry');
my $log = $log[0];
is($log->id, (split /\s/, $rev_list[0])[0], 'id');

0 comments on commit 49c8a28

Please sign in to comment.