X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Frgit.git;a=blobdiff_plain;f=t%2F21-once.t;h=e61e81c73c98664af4df343b9ab129a3822efa3f;hp=5333be0748f5ac86b2c19dc4022a70fbfe7646bb;hb=a5ba1389e8ec450b16fd6e283f3edc80df1878c9;hpb=c3b443e68bbe06efc7c40f0f9ace3919a6d0864b

diff --git a/t/21-once.t b/t/21-once.t
index 5333be0..e61e81c 100644
--- a/t/21-once.t
+++ b/t/21-once.t
@@ -32,6 +32,7 @@ for my $cmd (qw/daemon gui help init version/) {
  is(@lines, 1, "once $cmd visited only one repo");
  my $r = [ split /\|/, defined $lines[0] ? $lines[0] : '' ];
  my $e = [ $cmd, qw/@n @g @w @b @@/ ];
+ s/[\r\n]*$// for @$r;
  is($r->[$_], $e->[$_], "once $cmd argument $_ is ok")
   for 0 .. 5;
 }