(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "various format-patch tests">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]}  )
  (Com {[LIT_CHARS .]} {[DQ [VarSub TEST_DIRECTORY]] [LIT_CHARS /lib-terminal.sh]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS setup]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tfor i in 1 2 3 4 5 6 7 8 9 10; do echo \"$i\"; done >file &&\n"> <LIT_CHARS "\tcat file >elif &&\n"> <LIT_CHARS "\tgit add file elif &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m Initial &&\n"> <LIT_CHARS "\tgit checkout -b side &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tfor i in 1 2 5 6 A B C 7 8 9 10; do echo \"$i\"; done >file &&\n"> <LIT_CHARS "\ttest_chmod +x elif &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m \"Side changes #1\" &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tfor i in D E F; do echo \"$i\"; done >>file &&\n"> <LIT_CHARS "\tgit update-index file &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m \"Side changes #2\" &&\n"> <LIT_CHARS "\tgit tag C2 &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tfor i in 5 6 1 2 3 A 4 B C 7 8 9 10 D E F; do echo \"$i\"; done >file &&\n"> <LIT_CHARS "\tgit update-index file &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m \"Side changes #3 with \\\\n backslash-n in it.\" &&\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout master &&\n"> <LIT_CHARS "\tgit diff-tree -p C2 | git apply --index &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -m \"Master accepts moral equivalent of #2\"\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "format-patch --ignore-if-in-upstream"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch --stdout master..side >patch0 &&\n"> <LIT_CHARS "\tcnt=`grep \"^From \" patch0 | wc -l` &&\n"> <LIT_CHARS "\ttest $cnt = 3\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "format-patch --ignore-if-in-upstream"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch --stdout \\\n"> <LIT_CHARS "\t\t--ignore-if-in-upstream master..side >patch1 &&\n"> <LIT_CHARS "\tcnt=`grep \"^From \" patch1 | wc -l` &&\n"> <LIT_CHARS "\ttest $cnt = 2\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "format-patch doesn't consider merge commits"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -b slave master &&\n"> <LIT_CHARS "\techo \"Another line\" >>file &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -am \"Slave change #1\" &&\n"> <LIT_CHARS "\techo \"Yet another line\" >>file &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit commit -am \"Slave change #2\" &&\n"> <LIT_CHARS "\tgit checkout -b merger master &&\n"> <LIT_CHARS "\ttest_tick &&\n"> <LIT_CHARS "\tgit merge --no-ff slave &&\n"> <LIT_CHARS "\tcnt=`git format-patch -3 --stdout | grep \"^From \" | wc -l` &&\n"> <LIT_CHARS "\ttest $cnt = 3\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "format-patch result applies"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -b rebuild-0 master &&\n"> <LIT_CHARS "\tgit am -3 patch0 &&\n"> <LIT_CHARS "\tcnt=`git rev-list master.. | wc -l` &&\n"> <LIT_CHARS "\ttest $cnt = 2\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[DQ [LIT_CHARS "format-patch --ignore-if-in-upstream result applies"]]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout -b rebuild-1 master &&\n"> <LIT_CHARS "\tgit am -3 patch1 &&\n"> <LIT_CHARS "\tcnt=`git rev-list master.. | wc -l` &&\n"> <LIT_CHARS "\ttest $cnt = 2\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "commit did not screw up the log message">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit cat-file commit side | grep \"^Side .* with .* backslash-n\"\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch did not screw up the log message">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgrep \"^Subject: .*Side changes #3 with .* backslash-n\" patch0 &&\n"> <LIT_CHARS "\tgrep \"^Subject: .*Side changes #3 with .* backslash-n\" patch1\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "replay did not screw up the log message">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit cat-file commit rebuild-1 | grep \"^Side .* with .* backslash-n\"\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "extra headers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config format.headers \"To: R. E. Cipient <rcipient@example.com>\n"> <LIT_CHARS "\" &&\n"> <LIT_CHARS "\tgit config --add format.headers \"Cc: S. E. Cipient <scipient@example.com>\n"> <LIT_CHARS "\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout master..side > patch2 &&\n"> <LIT_CHARS "\tsed -e \"/^\\$/q\" patch2 > hdrs2 &&\n"> <LIT_CHARS "\tgrep \"^To: R. E. Cipient <rcipient@example.com>\\$\" hdrs2 &&\n"> <LIT_CHARS "\tgrep \"^Cc: S. E. Cipient <scipient@example.com>\\$\" hdrs2\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "extra headers without newlines">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --replace-all format.headers \"To: R. E. Cipient <rcipient@example.com>\" &&\n"> <LIT_CHARS "\tgit config --add format.headers \"Cc: S. E. Cipient <scipient@example.com>\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout master..side >patch3 &&\n"> <LIT_CHARS "\tsed -e \"/^\\$/q\" patch3 > hdrs3 &&\n"> <LIT_CHARS "\tgrep \"^To: R. E. Cipient <rcipient@example.com>\\$\" hdrs3 &&\n"> <LIT_CHARS "\tgrep \"^Cc: S. E. Cipient <scipient@example.com>\\$\" hdrs3\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "extra headers with multiple To:s">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --replace-all format.headers \"To: R. E. Cipient <rcipient@example.com>\" &&\n"> <LIT_CHARS "\tgit config --add format.headers \"To: S. E. Cipient <scipient@example.com>\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout master..side > patch4 &&\n"> <LIT_CHARS "\tsed -e \"/^\\$/q\" patch4 > hdrs4 &&\n"> <LIT_CHARS "\tgrep \"^To: R. E. Cipient <rcipient@example.com>,\\$\" hdrs4 &&\n"> <LIT_CHARS "\tgrep \"^ *S. E. Cipient <scipient@example.com>\\$\" hdrs4\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "additional command line cc">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --replace-all format.headers \"Cc: R. E. Cipient <rcipient@example.com>\" &&\n"> <LIT_CHARS "\tgit format-patch --cc=\"S. E. Cipient <scipient@example.com>\" --stdout master..side | sed -e \"/^\\$/q\" >patch5 &&\n"> <LIT_CHARS "\tgrep \"^Cc: R. E. Cipient <rcipient@example.com>,\\$\" patch5 &&\n"> <LIT_CHARS "\tgrep \"^ *S. E. Cipient <scipient@example.com>\\$\" patch5\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "command line headers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --unset-all format.headers &&\n"> <LIT_CHARS "\tgit format-patch --add-header=\"Cc: R. E. Cipient <rcipient@example.com>\" --stdout master..side | sed -e \"/^\\$/q\" >patch6 &&\n"> <LIT_CHARS "\tgrep \"^Cc: R. E. Cipient <rcipient@example.com>\\$\" patch6\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "configuration headers and command line headers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --replace-all format.headers \"Cc: R. E. Cipient <rcipient@example.com>\" &&\n"> <LIT_CHARS "\tgit format-patch --add-header=\"Cc: S. E. Cipient <scipient@example.com>\" --stdout master..side | sed -e \"/^\\$/q\" >patch7 &&\n"> <LIT_CHARS "\tgrep \"^Cc: R. E. Cipient <rcipient@example.com>,\\$\" patch7 &&\n"> <LIT_CHARS "\tgrep \"^ *S. E. Cipient <scipient@example.com>\\$\" patch7\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "command line To: header">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --unset-all format.headers &&\n"> <LIT_CHARS "\tgit format-patch --to=\"R. E. Cipient <rcipient@example.com>\" --stdout master..side | sed -e \"/^\\$/q\" >patch8 &&\n"> <LIT_CHARS "\tgrep \"^To: R. E. Cipient <rcipient@example.com>\\$\" patch8\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "configuration To: header">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config format.to \"R. E. Cipient <rcipient@example.com>\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout master..side | sed -e \"/^\\$/q\" >patch9 &&\n"> <LIT_CHARS "\tgrep \"^To: R. E. Cipient <rcipient@example.com>\\$\" patch9\n">]}  )
  (FunctionDef check_patch []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS grep]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "^From:"]]} {[DQ [VarSub 1]]}      )
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS grep]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "^Date:"]]} {[DQ [VarSub 1]]}        )
        (Com {[LIT_CHARS grep]} {[LIT_CHARS -e]} {[DQ [LIT_CHARS "^Subject:"]]} {[DQ [VarSub 1]]}        )
      )
    )
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--no-to overrides config.to">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --replace-all format.to \\\n"> <LIT_CHARS "\t\t\"R. E. Cipient <rcipient@example.com>\" &&\n"> <LIT_CHARS "\tgit format-patch --no-to --stdout master..side |\n"> <LIT_CHARS "\tsed -e \"/^\\$/q\" >patch10 &&\n"> <LIT_CHARS "\tcheck_patch patch10 &&\n"> <LIT_CHARS "\t! grep \"^To: R. E. Cipient <rcipient@example.com>\\$\" patch10\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--no-to and --to replaces config.to">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --replace-all format.to \\\n"> <LIT_CHARS "\t\t\"Someone <someone@out.there>\" &&\n"> <LIT_CHARS "\tgit format-patch --no-to --to=\"Someone Else <else@out.there>\" \\\n"> <LIT_CHARS "\t\t--stdout master..side |\n"> <LIT_CHARS "\tsed -e \"/^\\$/q\" >patch11 &&\n"> <LIT_CHARS "\tcheck_patch patch11 &&\n"> <LIT_CHARS "\t! grep \"^To: Someone <someone@out.there>\\$\" patch11 &&\n"> <LIT_CHARS "\tgrep \"^To: Someone Else <else@out.there>\\$\" patch11\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--no-cc overrides config.cc">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --replace-all format.cc \\\n"> <LIT_CHARS "\t\t\"C. E. Cipient <rcipient@example.com>\" &&\n"> <LIT_CHARS "\tgit format-patch --no-cc --stdout master..side |\n"> <LIT_CHARS "\tsed -e \"/^\\$/q\" >patch12 &&\n"> <LIT_CHARS "\tcheck_patch patch12 &&\n"> <LIT_CHARS "\t! grep \"^Cc: C. E. Cipient <rcipient@example.com>\\$\" patch12\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "--no-add-header overrides config.headers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --replace-all format.headers \\\n"> <LIT_CHARS "\t\t\"Header1: B. E. Cipient <rcipient@example.com>\" &&\n"> <LIT_CHARS "\tgit format-patch --no-add-header --stdout master..side |\n"> <LIT_CHARS "\tsed -e \"/^\\$/q\" >patch13 &&\n"> <LIT_CHARS "\tcheck_patch patch13 &&\n"> <LIT_CHARS "\t! grep \"^Header1: B. E. Cipient <rcipient@example.com>\\$\" patch13\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "multiple files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf patches/ &&\n"> <LIT_CHARS "\tgit checkout side &&\n"> <LIT_CHARS "\tgit format-patch -o patches/ master &&\n"> <LIT_CHARS "\tls patches/0001-Side-changes-1.patch patches/0002-Side-changes-2.patch patches/0003-Side-changes-3-with-n-backslash-n-in-it.patch\n">]}  )
  (FunctionDef check_threading []
    (AndOr OP_AND_IF
      (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('expect', {[DQ [VarSub 1]]})])
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS shift]}        )
        (AndOr OP_AND_IF
          (Pipeline
            (Subshell
              (List
                (Com {[LIT_CHARS git]} {[LIT_CHARS format-patch]} {[LIT_CHARS --stdout]} {[DQ [VarSub @]]}                )
                (Com {[LIT_CHARS echo]} {[VarSub ?]}
                  <
                  (FilenameRedirectNode filename={[LIT_CHARS status.out]} <REDIR_GREAT ">"> 1),
                  >
                )
              )
            )
            (Com {[DQ [VarSub PERL_PATH]]} {[LIT_CHARS -ne]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t\tif (/^(message-id|references|in-reply-to)/i) {\n"> <LIT_CHARS "\t\t\t$printing = 1;\n"> <LIT_CHARS "\t\t} elsif (/^\\S/) {\n"> <LIT_CHARS "\t\t\t$printing = 0;\n"> <LIT_CHARS "\t\t}\n"> <LIT_CHARS "\t\tif ($printing) {\n"> <LIT_CHARS "\t\t\t$h{$1}=$i++ if (/<([^>]+)>/ and !exists $h{$1});\n"> <LIT_CHARS "\t\t\tfor $k (keys %h) {s/$k/$h{$k}/};\n"> <LIT_CHARS "\t\t\tprint;\n"> <LIT_CHARS "\t\t}\n"> <LIT_CHARS "\t\tprint \"---\\n\" if /^From /i;\n"> <LIT_CHARS "\t">]}
              <
              (FilenameRedirectNode filename={[LIT_CHARS actual]} <REDIR_GREAT ">"> 1),
              >
            )
          )
          (AndOr OP_AND_IF
            (Com {[LIT_CHARS test]} {[LIT_CHARS 0]} {[LIT_DBRACKET_LIKE "="]} {[DQ [ComSub (Com {[LIT_CHARS cat]} {[LIT_CHARS status.out]})]]}            )
            (Com {[LIT_CHARS test_cmp]} {[DQ [VarSub expect]]} {[LIT_CHARS actual]}            )
          )
        )
      )
    )
  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.no-threading]} <REDIR_DGREAT ">>"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "---\n"][LIT_CHARS "---\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "no threading">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit checkout side &&\n"> <LIT_CHARS "\tcheck_threading expect.no-threading master\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.thread]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <1>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <2>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <0>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS thread>]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.thread --thread master\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.in-reply-to]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <0>\n"][LIT_CHARS "In-Reply-To: <1>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <2>\n"][LIT_CHARS "In-Reply-To: <1>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <3>\n"][LIT_CHARS "In-Reply-To: <1>\n"][LIT_CHARS "References: <1>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread in-reply-to">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.in-reply-to --in-reply-to=\"<test.message>\" \\\n"> <LIT_CHARS "\t\t--thread master\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.cover-letter]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <1>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <2>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <3>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <0>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread cover-letter">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.cover-letter --cover-letter --thread master\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.cl-irt]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <0>\n"][LIT_CHARS "In-Reply-To: <1>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <2>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "\t<0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <3>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "\t<0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <4>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "\t<0>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread cover-letter in-reply-to">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.cl-irt --cover-letter \\\n"> <LIT_CHARS "\t\t--in-reply-to=\"<test.message>\" --thread master\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread explicit shallow">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.cl-irt --cover-letter \\\n"> <LIT_CHARS "\t\t--in-reply-to=\"<test.message>\" --thread=shallow master\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.deep]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <1>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <2>\n"][LIT_CHARS "In-Reply-To: <1>\n"][LIT_CHARS "References: <0>\n"][LIT_CHARS "\t<1>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread deep">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.deep --thread=deep master\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.deep-irt]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <0>\n"][LIT_CHARS "In-Reply-To: <1>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <2>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "\t<0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <3>\n"][LIT_CHARS "In-Reply-To: <2>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "\t<0>\n"][LIT_CHARS "\t<2>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread deep in-reply-to">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.deep-irt  --thread=deep \\\n"> <LIT_CHARS "\t\t--in-reply-to=\"<test.message>\" master\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.deep-cl]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <1>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <2>\n"][LIT_CHARS "In-Reply-To: <1>\n"][LIT_CHARS "References: <0>\n"][LIT_CHARS "\t<1>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <3>\n"][LIT_CHARS "In-Reply-To: <2>\n"][LIT_CHARS "References: <0>\n"][LIT_CHARS "\t<1>\n"][LIT_CHARS "\t<2>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread deep cover-letter">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.deep-cl --cover-letter --thread=deep master\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.deep-cl-irt]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <0>\n"][LIT_CHARS "In-Reply-To: <1>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <2>\n"][LIT_CHARS "In-Reply-To: <0>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "\t<0>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <3>\n"][LIT_CHARS "In-Reply-To: <2>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "\t<0>\n"][LIT_CHARS "\t<2>\n"][LIT_CHARS "---\n"][LIT_CHARS "Message-Id: <4>\n"][LIT_CHARS "In-Reply-To: <3>\n"][LIT_CHARS "References: <1>\n"][LIT_CHARS "\t<0>\n"][LIT_CHARS "\t<2>\n"][LIT_CHARS "\t<3>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread deep cover-letter in-reply-to">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_threading expect.deep-cl-irt --cover-letter \\\n"> <LIT_CHARS "\t\t--in-reply-to=\"<test.message>\" --thread=deep master\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread via config">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_config format.thread true &&\n"> <LIT_CHARS "\tcheck_threading expect.thread master\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread deep via config">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_config format.thread deep &&\n"> <LIT_CHARS "\tcheck_threading expect.deep master\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread config + override">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_config format.thread deep &&\n"> <LIT_CHARS "\tcheck_threading expect.thread --thread master\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "thread config + --no-thread">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_config format.thread deep &&\n"> <LIT_CHARS "\tcheck_threading expect.no-threading --no-thread master\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "excessive subject">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf patches/ &&\n"> <LIT_CHARS "\tgit checkout side &&\n"> <LIT_CHARS "\tfor i in 5 6 1 2 3 A 4 B C 7 8 9 10 D E F; do echo \"$i\"; done >>file &&\n"> <LIT_CHARS "\tgit update-index file &&\n"> <LIT_CHARS "\tgit commit -m \"This is an excessively long subject line for a message due to the habit some projects have of not having a short, one-line subject at the start of the commit message, but rather sticking a whole paragraph right at the start as the only thing in the commit message. It had better not become the filename for the patch.\" &&\n"> <LIT_CHARS "\tgit format-patch -o patches/ master..side &&\n"> <LIT_CHARS "\tls patches/0004-This-is-an-excessively-long-subject-line-for-a-messa.patch\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "cover-letter inherits diff options">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit mv file foo &&\n"> <LIT_CHARS "\tgit commit -m foo &&\n"> <LIT_CHARS "\tgit format-patch --cover-letter -1 &&\n"> <LIT_CHARS "\tcheck_patch 0000-cover-letter.patch &&\n"> <LIT_CHARS "\t! grep \"file => foo .* 0 *\\$\" 0000-cover-letter.patch &&\n"> <LIT_CHARS "\tgit format-patch --cover-letter -1 -M &&\n"> <LIT_CHARS "\tgrep \"file => foo .* 0 *\\$\" 0000-cover-letter.patch\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "  This is an excessively long subject line for a message due to the\n"][LIT_CHARS "    habit some projects have of not having a short, one-line subject at\n"][LIT_CHARS "    the start of the commit message, but rather sticking a whole\n"][LIT_CHARS "    paragraph right at the start as the only thing in the commit\n"][LIT_CHARS "    message. It had better not become the filename for the patch.\n"][LIT_CHARS "  foo\n"][LIT_CHARS "\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "shortlog of cover-letter wraps overly-long onelines">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch --cover-letter -2 &&\n"> <LIT_CHARS "\tsed -e \"1,/A U Thor/d\" -e \"/^\\$/q\" < 0000-cover-letter.patch > output &&\n"> <LIT_CHARS "\ttest_cmp expect output\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "index 40f36c6..2dc5c23 100644\n"][LIT_CHARS "--- a/file\n"][LIT_CHARS "+++ b/file\n"][LIT_CHARS "@@ -13,4 +13,20 @@ C\n"][LIT_CHARS " 10\n"][LIT_CHARS " D\n"][LIT_CHARS " E\n"][LIT_CHARS " F\n"][LIT_CHARS "+5\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch respects -U">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch -U4 -2 &&\n"> <LIT_CHARS "\tsed -e \"1,/^diff/d\" -e \"/^+5/q\" \\\n"> <LIT_CHARS "\t\t<0001-This-is-an-excessively-long-subject-line-for-a-messa.patch \\\n"> <LIT_CHARS "\t\t>output &&\n"> <LIT_CHARS "\ttest_cmp expect output\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "\n"][LIT_CHARS "diff --git a/file b/file\n"][LIT_CHARS "index 40f36c6..2dc5c23 100644\n"][LIT_CHARS "--- a/file\n"][LIT_CHARS "+++ b/file\n"][LIT_CHARS "@@ -14,3 +14,19 @@ C\n"][LIT_CHARS " D\n"][LIT_CHARS " E\n"][LIT_CHARS " F\n"][LIT_CHARS "+5\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch -p suppresses stat">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch -p -2 &&\n"> <LIT_CHARS "\tsed -e \"1,/^\\$/d\" -e \"/^+5/q\" < 0001-This-is-an-excessively-long-subject-line-for-a-messa.patch > output &&\n"> <LIT_CHARS "\ttest_cmp expect output\n"> <LIT_CHARS "\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch from a subdirectory (1)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tfilename=$(\n"> <LIT_CHARS "\t\trm -rf sub &&\n"> <LIT_CHARS "\t\tmkdir -p sub/dir &&\n"> <LIT_CHARS "\t\tcd sub/dir &&\n"> <LIT_CHARS "\t\tgit format-patch -1\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\tcase \"$filename\" in\n"> <LIT_CHARS "\t0*)\n"> <LIT_CHARS "\t\t;; # ok\n"> <LIT_CHARS "\t*)\n"> <LIT_CHARS "\t\techo \"Oops? $filename\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\t\t;;\n"> <LIT_CHARS "\tesac &&\n"> <LIT_CHARS "\ttest -f \"$filename\"\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch from a subdirectory (2)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tfilename=$(\n"> <LIT_CHARS "\t\trm -rf sub &&\n"> <LIT_CHARS "\t\tmkdir -p sub/dir &&\n"> <LIT_CHARS "\t\tcd sub/dir &&\n"> <LIT_CHARS "\t\tgit format-patch -1 -o ..\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\tcase \"$filename\" in\n"> <LIT_CHARS "\t../0*)\n"> <LIT_CHARS "\t\t;; # ok\n"> <LIT_CHARS "\t*)\n"> <LIT_CHARS "\t\techo \"Oops? $filename\"\n"> <LIT_CHARS "\t\tfalse\n"> <LIT_CHARS "\t\t;;\n"> <LIT_CHARS "\tesac &&\n"> <LIT_CHARS "\tbasename=$(expr \"$filename\" : \".*/\\(.*\\)\") &&\n"> <LIT_CHARS "\ttest -f \"sub/$basename\"\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch from a subdirectory (3)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f 0* &&\n"> <LIT_CHARS "\tfilename=$(\n"> <LIT_CHARS "\t\trm -rf sub &&\n"> <LIT_CHARS "\t\tmkdir -p sub/dir &&\n"> <LIT_CHARS "\t\tcd sub/dir &&\n"> <LIT_CHARS "\t\tgit format-patch -1 -o \"$TRASH_DIRECTORY\"\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\tbasename=$(expr \"$filename\" : \".*/\\(.*\\)\") &&\n"> <LIT_CHARS "\ttest -f \"$basename\"\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --in-reply-to">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch -1 --stdout --in-reply-to \"baz@foo.bar\" > patch8 &&\n"> <LIT_CHARS "\tgrep \"^In-Reply-To: <baz@foo.bar>\" patch8 &&\n"> <LIT_CHARS "\tgrep \"^References: <baz@foo.bar>\" patch8\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --signoff">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch -1 --signoff --stdout |\n"> <LIT_CHARS "\tgrep \"^Signed-off-by: $GIT_COMMITTER_NAME <$GIT_COMMITTER_EMAIL>\"\n">]}  )
  (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "fatal: --name-only does not make sense"]]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.name-only]} <REDIR_GREAT ">"> 1),
    >
  )
  (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "fatal: --name-status does not make sense"]]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.name-status]} <REDIR_GREAT ">"> 1),
    >
  )
  (Com {[LIT_CHARS echo]} {[DQ [LIT_CHARS "fatal: --check does not make sense"]]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect.check]} <REDIR_GREAT ">"> 1),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "options no longer allowed for format-patch">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_must_fail git format-patch --name-only 2> output &&\n"> <LIT_CHARS "\ttest_i18ncmp expect.name-only output &&\n"> <LIT_CHARS "\ttest_must_fail git format-patch --name-status 2> output &&\n"> <LIT_CHARS "\ttest_i18ncmp expect.name-status output &&\n"> <LIT_CHARS "\ttest_must_fail git format-patch --check 2> output &&\n"> <LIT_CHARS "\ttest_i18ncmp expect.check output">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --numstat should produce a patch">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch --numstat --stdout master..side > output &&\n"> <LIT_CHARS "\ttest 6 = $(grep \"^diff --git a/\" output | wc -l)">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch -- <path>">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch master..side -- file 2>error &&\n"> <LIT_CHARS "\t! grep \"Use .--\" error\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --ignore-if-in-upstream HEAD">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch --ignore-if-in-upstream HEAD\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --signature">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch --stdout --signature=\"my sig\" -1 >output &&\n"> <LIT_CHARS "\tgrep \"my sig\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch with format.signature config">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config format.signature \"config sig\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout -1 >output &&\n"> <LIT_CHARS "\tgrep \"config sig\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --signature overrides format.signature">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config format.signature \"config sig\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout --signature=\"overrides\" -1 >output &&\n"> <LIT_CHARS "\t! grep \"config sig\" output &&\n"> <LIT_CHARS "\tgrep \"overrides\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --no-signature ignores format.signature">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config format.signature \"config sig\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout --signature=\"my sig\" --no-signature \\\n"> <LIT_CHARS "\t\t-1 >output &&\n"> <LIT_CHARS "\tcheck_patch output &&\n"> <LIT_CHARS "\t! grep \"config sig\" output &&\n"> <LIT_CHARS "\t! grep \"my sig\" output &&\n"> <LIT_CHARS "\t! grep \"^-- \\$\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --signature --cover-letter">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --unset-all format.signature &&\n"> <LIT_CHARS "\tgit format-patch --stdout --signature=\"my sig\" --cover-letter \\\n"> <LIT_CHARS "\t\t-1 >output &&\n"> <LIT_CHARS "\tgrep \"my sig\" output &&\n"> <LIT_CHARS "\ttest 2 = $(grep \"my sig\" output | wc -l)\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format.signature=\"\" supresses signatures">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config format.signature \"\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout -1 >output &&\n"> <LIT_CHARS "\tcheck_patch output &&\n"> <LIT_CHARS "\t! grep \"^-- \\$\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --no-signature supresses signatures">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit config --unset-all format.signature &&\n"> <LIT_CHARS "\tgit format-patch --stdout --no-signature -1 >output &&\n"> <LIT_CHARS "\tcheck_patch output &&\n"> <LIT_CHARS "\t! grep \"^-- \\$\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch --signature=\"\" supresses signatures">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch --stdout --signature=\"\" -1 >output &&\n"> <LIT_CHARS "\tcheck_patch output &&\n"> <LIT_CHARS "\t! grep \"^-- \\$\" output\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS TTY]} {[SQ <LIT_CHARS "format-patch --stdout paginates">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f pager_used &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tGIT_PAGER=\"wc >pager_used\" &&\n"> <LIT_CHARS "\t\texport GIT_PAGER &&\n"> <LIT_CHARS "\t\ttest_terminal git format-patch --stdout --all\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\ttest_path_is_file pager_used\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS TTY]} {[SQ <LIT_CHARS "format-patch --stdout pagination can be disabled">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f pager_used &&\n"> <LIT_CHARS "\t(\n"> <LIT_CHARS "\t\tGIT_PAGER=\"wc >pager_used\" &&\n"> <LIT_CHARS "\t\texport GIT_PAGER &&\n"> <LIT_CHARS "\t\ttest_terminal git --no-pager format-patch --stdout --all &&\n"> <LIT_CHARS "\t\ttest_terminal git -c \"pager.format-patch=false\" format-patch --stdout --all\n"> <LIT_CHARS "\t) &&\n"> <LIT_CHARS "\ttest_path_is_missing pager_used &&\n"> <LIT_CHARS "\ttest_path_is_missing .git/pager_used\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch handles multi-line subjects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf patches/ &&\n"> <LIT_CHARS "\techo content >>file &&\n"> <LIT_CHARS "\tfor i in one two three; do echo $i; done >msg &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tgit commit -F msg &&\n"> <LIT_CHARS "\tgit format-patch -o patches -1 &&\n"> <LIT_CHARS "\tgrep ^Subject: patches/0001-one.patch >actual &&\n"> <LIT_CHARS "\techo \"Subject: [PATCH] one two three\" >expect &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch handles multi-line encoded subjects">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf patches/ &&\n"> <LIT_CHARS "\techo content >>file &&\n"> <LIT_CHARS "\tfor i in en tv\u00e5 tre; do echo $i; done >msg &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tgit commit -F msg &&\n"> <LIT_CHARS "\tgit format-patch -o patches -1 &&\n"> <LIT_CHARS "\tgrep ^Subject: patches/0001-en.patch >actual &&\n"> <LIT_CHARS "\techo \"Subject: [PATCH] =?UTF-8?q?en=20tv=C3=A5=20tre?=\" >expect &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('M8', {[DQ [LIT_CHARS "foo bar "]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('M64', {[VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('M512', {[VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64]})])
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "Subject: [PATCH] foo bar foo bar foo bar foo bar foo bar foo bar foo bar foo\n"] [LIT_CHARS " bar foo bar foo bar foo bar foo bar foo bar foo bar foo bar\n"] [LIT_CHARS " foo bar foo bar foo bar foo bar foo bar foo bar foo bar foo\n"] [LIT_CHARS " bar foo bar foo bar foo bar foo bar foo bar foo bar foo bar\n"] [LIT_CHARS " foo bar foo bar foo bar foo bar foo bar foo bar foo bar foo\n"] [LIT_CHARS " bar foo bar foo bar foo bar foo bar foo bar foo bar foo bar\n"] [LIT_CHARS " foo bar foo bar foo bar foo bar foo bar foo bar foo bar foo\n"] [LIT_CHARS " bar foo bar foo bar foo bar foo bar foo bar foo bar foo bar\n"] [LIT_CHARS " foo bar foo bar foo bar foo bar\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch wraps extremely long headers (ascii)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo content >>file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tgit commit -m \"$M512\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout -1 >patch &&\n"> <LIT_CHARS "\tsed -n \"/^Subject/p; /^ /p; /^$/q\" <patch >subject &&\n"> <LIT_CHARS "\ttest_cmp expect subject\n">]}  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('M8', {[DQ [LIT_CHARS "f\u00f6\u00f6 bar "]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('M64', {[VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('M512', {[VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64] [VarSub M64]})])
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "Subject: [PATCH] =?UTF-8?q?f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6=C3=B6=20bar=20f=C3=B6?=\n"] [LIT_CHARS " =?UTF-8?q?=C3=B6=20bar=20f=C3=B6=C3=B6=20bar?=\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch wraps extremely long headers (rfc2047)">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf patches/ &&\n"> <LIT_CHARS "\techo content >>file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tgit commit -m \"$M512\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout -1 >patch &&\n"> <LIT_CHARS "\tsed -n \"/^Subject/p; /^ /p; /^$/q\" <patch >subject &&\n"> <LIT_CHARS "\ttest_cmp expect subject\n">]}  )
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('M8', {[DQ [LIT_CHARS foo_bar_]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('M64', {[VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8] [VarSub M8]})])
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=True body_word={[DQ [LIT_CHARS "From: "][VarSub M64][LIT_CHARS "\n"][LIT_CHARS " <foobar@foo.bar>\n"]]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch wraps non-quotable headers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -rf patches/ &&\n"> <LIT_CHARS "\techo content >>file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tgit commit -mfoo --author \"$M64 <foobar@foo.bar>\" &&\n"> <LIT_CHARS "\tgit format-patch --stdout -1 >patch &&\n"> <LIT_CHARS "\tsed -n \"/^From: /p; /^ /p; /^$/q\" <patch >from &&\n"> <LIT_CHARS "\ttest_cmp expect from\n">]}  )
  (FunctionDef check_author []
    (AndOr OP_AND_IF
      (Com {[LIT_CHARS echo]} {[LIT_CHARS content]}
        <
        (FilenameRedirectNode filename={[LIT_CHARS file]} <REDIR_DGREAT ">>"> 1),
        >
      )
      (AndOr OP_AND_IF
        (Com {[LIT_CHARS git]} {[LIT_CHARS add]} {[LIT_CHARS file]}        )
        (AndOr OP_AND_IF
          (Com {[LIT_CHARS git]} {[LIT_CHARS commit]} {[LIT_CHARS -m]} {[LIT_CHARS author-check]}          more_env=[('GIT_AUTHOR_NAME', {[VarSub 1]})]           )
          (AndOr OP_AND_IF
            (Com {[LIT_CHARS git]} {[LIT_CHARS format-patch]} {[LIT_CHARS --stdout]} {[LIT_CHARS -1]}
              <
              (FilenameRedirectNode filename={[LIT_CHARS patch]} <REDIR_GREAT ">"> 1),
              >
            )
            (AndOr OP_AND_IF
              (Com {[LIT_CHARS grep]} {[LIT_OTHER "^"] [LIT_CHARS From] [LIT_OTHER ":"]} {[LIT_CHARS patch]}
                <
                (FilenameRedirectNode filename={[LIT_CHARS actual]} <REDIR_GREAT ">"> 1),
                >
              )
              (Com {[LIT_CHARS test_cmp]} {[LIT_CHARS expect]} {[LIT_CHARS actual]}              )
            )
          )
        )
      )
    )
  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "From: \"Foo B. Bar\" <author@example.com>\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch quotes dot in headers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_author \"Foo B. Bar\"\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "From: \"Foo \\\"The Baz\\\" Bar\" <author@example.com>\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format-patch quotes double-quote in headers">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_author \"Foo \\\"The Baz\\\" Bar\"\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "From: =?UTF-8?q?\"F=C3=B6o=20B.=20Bar\"?= <author@example.com>\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "rfc2047-encoded headers also double-quote 822 specials">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tcheck_author \"F\u00f6o B. Bar\"\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "Subject: header with . in it\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "subject lines do not have 822 atom-quoting">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo content >>file &&\n"> <LIT_CHARS "\tgit add file &&\n"> <LIT_CHARS "\tgit commit -m \"header with . in it\" &&\n"> <LIT_CHARS "\tgit format-patch -k -1 --stdout >patch &&\n"> <LIT_CHARS "\tgrep ^Subject: patch >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "Subject: [PREFIX 1/1] header with . in it\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "subject prefixes have space prepended">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch -n -1 --stdout --subject-prefix=PREFIX >patch &&\n"> <LIT_CHARS "\tgrep ^Subject: patch >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS cat]}
    <
    (FilenameRedirectNode filename={[LIT_CHARS expect]} <REDIR_GREAT ">"> 1),
    (HereDocRedirectNode here_end='EOF' do_expansion=False body_word={[LIT_CHARS "Subject: [1/1] header with . in it\n"]} <REDIR_DLESS "<<"> 0),
    >
  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "empty subject prefix does not have extra space">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\tgit format-patch -n -1 --stdout --subject-prefix= >patch &&\n"> <LIT_CHARS "\tgrep ^Subject: patch >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "format patch ignores color.ui">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_unconfig color.ui &&\n"> <LIT_CHARS "\tgit format-patch --stdout -1 >expect &&\n"> <LIT_CHARS "\ttest_config color.ui always &&\n"> <LIT_CHARS "\tgit format-patch --stdout -1 >actual &&\n"> <LIT_CHARS "\ttest_cmp expect actual\n">]}  )
  (Com {[LIT_CHARS test_done]}  )
)