(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:test_description) op: assign_op.Equal rhs: {(SQ <'help.autocorrect finding a match'>)} spids: [4] ) ] ) (C {<.>} {<'./test-lib.sh'>}) (C {<test_expect_success>} {(SQ <setup>)} { (SQ <'\n'> <'\t# An alias\n'> <'\tgit config alias.lgf "log --format=%s --first-parent" &&\n'> <'\n'> <'\t# A random user-defined command\n'> <'\twrite_script git-distimdistim <<-EOF &&\n'> <'\t\techo distimdistim was called\n'> <'\tEOF\n'> <'\n'> <'\tPATH="$PATH:." &&\n'> <'\texport PATH &&\n'> <'\n'> <'\tgit commit --allow-empty -m "a single log entry" &&\n'> <'\n'> <'\t# Sanity check\n'> <'\tgit lgf >actual &&\n'> <'\techo "a single log entry" >expect &&\n'> <'\ttest_cmp expect actual &&\n'> <'\n'> <'\tgit distimdistim >actual &&\n'> <'\techo "distimdistim was called" >expect &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'autocorrect showing candidates'>)} { (SQ <'\n'> <'\tgit config help.autocorrect 0 &&\n'> <'\n'> <'\ttest_must_fail git lfg 2>actual &&\n'> <'\tgrep "^\tlgf" actual &&\n'> <'\n'> <'\ttest_must_fail git distimdist 2>actual &&\n'> <'\tgrep "^\tdistimdistim" actual\n'> ) } ) (C {<test_expect_success>} {(SQ <'autocorrect running commands'>)} { (SQ <'\n'> <'\tgit config help.autocorrect -1 &&\n'> <'\n'> <'\tgit lfg >actual &&\n'> <'\techo "a single log entry" >expect &&\n'> <'\ttest_cmp expect actual &&\n'> <'\n'> <'\tgit distimdist >actual &&\n'> <'\techo "distimdistim was called" >expect &&\n'> <'\ttest_cmp expect actual\n'> ) } ) (C {<test_done>}) ] )