Skip to content

Commit

Permalink
t0050: perl portability fix
Browse files Browse the repository at this point in the history
Older versions of perl (such as 5.005) don't understand -CO, nor
do they understand the "U" pack specifier. Instead of using perl,
let's just printf the binary bytes we are interested in.

Signed-off-by: Jeff King <peff@peff.net>
Tested-by: Johannes Sixt <johannes.sixt@telecom.at>
Signed-off-by: Junio C Hamano <gitster@pobox.com>
  • Loading branch information
Jeff King authored and Junio C Hamano committed Mar 13, 2008
1 parent 40a7ce6 commit e8e29c7
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions t/t0050-filesystem.sh
Original file line number Diff line number Diff line change
Expand Up @@ -4,8 +4,8 @@ test_description='Various filesystem issues'

. ./test-lib.sh

auml=`perl -CO -e 'print pack("U",0x00E4)'`
aumlcdiar=`perl -CO -e 'print pack("U",0x0061).pack("U",0x0308)'`
auml=`printf '\xc3\xa4'`
aumlcdiar=`printf '\x61\xcc\x88'`

test_expect_success 'see if we expect ' '
Expand Down

0 comments on commit e8e29c7

Please sign in to comment.