aboutsummaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorAlex Riesen <raa.lkml@gmail.com>2007-06-27 14:40:41 +0200
committerJunio C Hamano <gitster@pobox.com>2007-06-28 21:18:01 -0700
commit2b9a50208f2664d228b238affd8496d4d9677d56 (patch)
treea173fa6aa18e711e5103134f64ee4bf765cd5e44 /t
parent7051c3b1294a110a862a7b48e983490fba32389f (diff)
downloadgit-2b9a50208f2664d228b238affd8496d4d9677d56.tar.gz
git-2b9a50208f2664d228b238affd8496d4d9677d56.tar.xz
Avoid perl in t1300-repo-config
It fixes the test on system where ActiveState Perl is used. Signed-off-by: Alex Riesen <raa.lkml@gmail.com> Signed-off-by: Junio C Hamano <gitster@pobox.com>
Diffstat (limited to 't')
-rwxr-xr-xt/t1300-repo-config.sh22
1 files changed, 10 insertions, 12 deletions
diff --git a/t/t1300-repo-config.sh b/t/t1300-repo-config.sh
index 7a77bef4c..27486de4d 100755
--- a/t/t1300-repo-config.sh
+++ b/t/t1300-repo-config.sh
@@ -529,25 +529,23 @@ cat > .git/config <<\EOF
EOF
cat > expect <<\EOF
-Key: section.sub=section.val1
-Value: foo=bar
-Key: section.sub=section.val2
-Value: foo
-bar
-Key: section.sub=section.val3
-Value:
+section.sub=section.val1
+foo=barQsection.sub=section.val2
+foo
+barQsection.sub=section.val3
-Key: section.sub=section.val4
-Value:
-Key: section.sub=section.val5
+Qsection.sub=section.val4
+Qsection.sub=section.val5Q
EOF
-git config --null --list | perl -0ne 'chop;($key,$value)=split(/\n/,$_,2);print "Key: $key\n";print "Value: $value\n" if defined($value)' > result
+git config --null --list | tr '[\000]' 'Q' > result
+echo >>result
test_expect_success '--null --list' 'cmp result expect'
-git config --null --get-regexp 'val[0-9]' | perl -0ne 'chop;($key,$value)=split(/\n/,$_,2);print "Key: $key\n";print "Value: $value\n" if defined($value)' > result
+git config --null --get-regexp 'val[0-9]' | tr '[\000]' 'Q' > result
+echo >>result
test_expect_success '--null --get-regexp' 'cmp result expect'