t6013: replace use of 'tac' with equivalent Perl
authorThomas Rast <trast@student.ethz.ch>
Sun, 31 Aug 2008 22:31:37 +0000 (00:31 +0200)
committerJunio C Hamano <gitster@pobox.com>
Sun, 31 Aug 2008 23:34:11 +0000 (16:34 -0700)
'tac' is not available everywhere, so substitute the equivalent Perl
code 'print reverse <>'. Noticed by Brian Gernhardt.

Signed-off-by: Thomas Rast <trast@student.ethz.ch>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
t/t6013-rev-list-reverse-parents.sh
index d294466427bd2fca79874e64bf327568a402a261..59fc2f06e0b5895af60b6eb4084fe7a38d3aa948 100755 (executable)
@@ -25,7 +25,7 @@ test_expect_success 'set up --reverse example' '
 
 test_expect_success '--reverse --parents --full-history combines correctly' '
        git rev-list --parents --full-history master -- foo |
-               tac > expected &&
+               perl -e "print reverse <>" > expected &&
        git rev-list --reverse --parents --full-history master -- foo \
                > actual &&
        test_cmp actual expected
@@ -33,7 +33,7 @@ test_expect_success '--reverse --parents --full-history combines correctly' '
 
 test_expect_success '--boundary does too' '
        git rev-list --boundary --parents --full-history master ^root -- foo |
-               tac > expected &&
+               perl -e "print reverse <>" > expected &&
        git rev-list --boundary --reverse --parents --full-history \
                master ^root -- foo > actual &&
        test_cmp actual expected