(List
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('test_description', {[SQ <LIT_CHARS "credential-store tests">]})])
  (Com {[LIT_CHARS .]} {[LIT_CHARS ./test-lib.sh]})
  (Com {[LIT_CHARS .]} {[DQ [VarSub TEST_DIRECTORY]] [LIT_CHARS /lib-credential.sh]})
  (Com {[LIT_CHARS helper_test]} {[LIT_CHARS store]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "when xdg file does not exist, xdg file not created">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_path_is_missing \"$HOME/.config/git/credentials\" &&\n"> <LIT_CHARS "\ttest -s \"$HOME/.git-credentials\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup xdg file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f \"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\tmkdir -p \"$HOME/.config/git\" &&\n"> <LIT_CHARS "\t>\"$HOME/.config/git/credentials\"\n">]})
  (Com {[LIT_CHARS helper_test]} {[LIT_CHARS store]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "when xdg file exists, home file not created">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest -s \"$HOME/.config/git/credentials\" &&\n"> <LIT_CHARS "\ttest_path_is_missing \"$HOME/.git-credentials\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "setup custom xdg file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\trm -f \"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\trm -f \"$HOME/.config/git/credentials\" &&\n"> <LIT_CHARS "\tmkdir -p \"$HOME/xdg/git\" &&\n"> <LIT_CHARS "\t>\"$HOME/xdg/git/credentials\"\n">]})
  (= scope=<EAssignScope.GLOBAL 1> flags=0 words=[] bindings=[('XDG_CONFIG_HOME', {[DQ [VarSub HOME][LIT_CHARS /xdg]]})])
  (= scope=<EAssignScope.GLOBAL 1> flags=1 words=[{[LIT_CHARS XDG_CONFIG_HOME]}] bindings=[])
  (Com {[LIT_CHARS helper_test]} {[LIT_CHARS store]})
  (Com {[LIT_CHARS unset]} {[LIT_CHARS XDG_CONFIG_HOME]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "if custom xdg file exists, home and xdg files not created">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\ttest_when_finished \"rm -f $HOME/xdg/git/credentials\" &&\n"> <LIT_CHARS "\ttest -s \"$HOME/xdg/git/credentials\" &&\n"> <LIT_CHARS "\ttest_path_is_missing \"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\ttest_path_is_missing \"$HOME/.config/git/credentials\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "get: use home file if both home and xdg files have matches">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"https://home-user:home-pass@example.com\" >\"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\tmkdir -p \"$HOME/.config/git\" &&\n"> <LIT_CHARS "\techo \"https://xdg-user:xdg-pass@example.com\" >\"$HOME/.config/git/credentials\" &&\n"> <LIT_CHARS "\tcheck fill store <<-\\EOF\n"> <LIT_CHARS "\tprotocol=https\n"> <LIT_CHARS "\thost=example.com\n"> <LIT_CHARS "\t--\n"> <LIT_CHARS "\tprotocol=https\n"> <LIT_CHARS "\thost=example.com\n"> <LIT_CHARS "\tusername=home-user\n"> <LIT_CHARS "\tpassword=home-pass\n"> <LIT_CHARS "\t--\n"> <LIT_CHARS "\tEOF\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "get: use xdg file if home file has no matches">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t>\"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\tmkdir -p \"$HOME/.config/git\" &&\n"> <LIT_CHARS "\techo \"https://xdg-user:xdg-pass@example.com\" >\"$HOME/.config/git/credentials\" &&\n"> <LIT_CHARS "\tcheck fill store <<-\\EOF\n"> <LIT_CHARS "\tprotocol=https\n"> <LIT_CHARS "\thost=example.com\n"> <LIT_CHARS "\t--\n"> <LIT_CHARS "\tprotocol=https\n"> <LIT_CHARS "\thost=example.com\n"> <LIT_CHARS "\tusername=xdg-user\n"> <LIT_CHARS "\tpassword=xdg-pass\n"> <LIT_CHARS "\t--\n"> <LIT_CHARS "\tEOF\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[LIT_CHARS POSIXPERM] [LIT_COMMA ","] [LIT_CHARS SANITY]} {[SQ <LIT_CHARS "get: use xdg file if home file is unreadable">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"https://home-user:home-pass@example.com\" >\"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\tchmod -r \"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\tmkdir -p \"$HOME/.config/git\" &&\n"> <LIT_CHARS "\techo \"https://xdg-user:xdg-pass@example.com\" >\"$HOME/.config/git/credentials\" &&\n"> <LIT_CHARS "\tcheck fill store <<-\\EOF\n"> <LIT_CHARS "\tprotocol=https\n"> <LIT_CHARS "\thost=example.com\n"> <LIT_CHARS "\t--\n"> <LIT_CHARS "\tprotocol=https\n"> <LIT_CHARS "\thost=example.com\n"> <LIT_CHARS "\tusername=xdg-user\n"> <LIT_CHARS "\tpassword=xdg-pass\n"> <LIT_CHARS "\t--\n"> <LIT_CHARS "\tEOF\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "store: if both xdg and home files exist, only store in home file">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\t>\"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\tmkdir -p \"$HOME/.config/git\" &&\n"> <LIT_CHARS "\t>\"$HOME/.config/git/credentials\" &&\n"> <LIT_CHARS "\tcheck approve store <<-\\EOF &&\n"> <LIT_CHARS "\tprotocol=https\n"> <LIT_CHARS "\thost=example.com\n"> <LIT_CHARS "\tusername=store-user\n"> <LIT_CHARS "\tpassword=store-pass\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\techo \"https://store-user:store-pass@example.com\" >expected &&\n"> <LIT_CHARS "\ttest_cmp expected \"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\ttest_must_be_empty \"$HOME/.config/git/credentials\"\n">]})
  (Com {[LIT_CHARS test_expect_success]} {[SQ <LIT_CHARS "erase: erase matching credentials from both xdg and home files">]} {[SQ <LIT_CHARS "\n"> <LIT_CHARS "\techo \"https://home-user:home-pass@example.com\" >\"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\tmkdir -p \"$HOME/.config/git\" &&\n"> <LIT_CHARS "\techo \"https://xdg-user:xdg-pass@example.com\" >\"$HOME/.config/git/credentials\" &&\n"> <LIT_CHARS "\tcheck reject store <<-\\EOF &&\n"> <LIT_CHARS "\tprotocol=https\n"> <LIT_CHARS "\thost=example.com\n"> <LIT_CHARS "\tEOF\n"> <LIT_CHARS "\ttest_must_be_empty \"$HOME/.git-credentials\" &&\n"> <LIT_CHARS "\ttest_must_be_empty \"$HOME/.config/git/credentials\"\n">]})
  (Com {[LIT_CHARS test_done]})
)