(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:test_description)
          op: Equal
          rhs: {(SQ <'git svn fancy glob test'>)}
          spids: [13]
        )
      ]
      spids: [13]
    )
    (C {(.)} {(./lib-git-svn.sh)})
    (C {(test_expect_success)} {(SQ <'load svn repo'>)} 
      {
        (DQ ('\n') ("\tsvnadmin load -q '") ($ VSub_Name '$rawsvnrepo') ("' < '") 
          ($ VSub_Name '$TEST_DIRECTORY') ("/t9154/svn.dump' &&\n") ("\tgit svn init --minimize-url -T trunk '") ($ VSub_Name '$svnrepo') 
          ("' &&\n") ('\tgit svn fetch\n') ('\t')
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'add red branch'>)} 
      {
        (DQ ('\n') ("\tgit config svn-remote.svn.branches 'branches/{red}:refs/remotes/*' &&\n") 
          ('\tgit svn fetch &&\n') ('\tgit rev-parse refs/remotes/red &&\n') ('\ttest_must_fail git rev-parse refs/remotes/green &&\n') 
          ('\ttest_must_fail git rev-parse refs/remotes/blue\n') ('\t')
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'add gre branch'>)} 
      {
        (DQ ('\n') 
          ('\tgit config --file=.git/svn/.metadata --unset svn-remote.svn.branches-maxRev &&\n') ("\tgit config svn-remote.svn.branches 'branches/{red,gre}:refs/remotes/*' &&\n") 
          ('\tgit svn fetch &&\n') ('\tgit rev-parse refs/remotes/red &&\n') ('\ttest_must_fail git rev-parse refs/remotes/green &&\n') 
          ('\ttest_must_fail git rev-parse refs/remotes/blue\n') ('\t')
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'add green branch'>)} 
      {
        (DQ ('\n') 
          ('\tgit config --file=.git/svn/.metadata --unset svn-remote.svn.branches-maxRev &&\n') ("\tgit config svn-remote.svn.branches 'branches/{red,green}:refs/remotes/*' &&\n") 
          ('\tgit svn fetch &&\n') ('\tgit rev-parse refs/remotes/red &&\n') ('\tgit rev-parse refs/remotes/green &&\n') 
          ('\ttest_must_fail git rev-parse refs/remotes/blue\n') ('\t')
        )
      }
    )
    (C {(test_expect_success)} {(SQ <'add all branches'>)} 
      {
        (DQ ('\n') 
          ('\tgit config --file=.git/svn/.metadata --unset svn-remote.svn.branches-maxRev &&\n') ("\tgit config svn-remote.svn.branches 'branches/*:refs/remotes/*' &&\n") ('\tgit svn fetch &&\n') 
          ('\tgit rev-parse refs/remotes/red &&\n') ('\tgit rev-parse refs/remotes/green &&\n') ('\tgit rev-parse refs/remotes/blue\n') ('\t')
        )
      }
    )
    (C {(test_done)})
  ]
)