(CommandList children: [ (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:test_description) op: Equal rhs: {(SQ <'git svn old rev_map preservd'>)} spids: [10] ) ] spids: [10] ) (C {(.)} {(./lib-git-svn.sh)}) (C {(test_expect_success)} {(SQ <'setup test repository with old layout'>)} { (SQ <'\n'> <'\tmkdir i &&\n'> <'\t(cd i && > a) &&\n'> <'\tsvn_cmd import -m- i "$svnrepo" &&\n'> <'\tgit svn init "$svnrepo" &&\n'> <'\tgit svn fetch &&\n'> <'\ttest -d .git/svn/refs/remotes/git-svn/ &&\n'> <'\t! test -e .git/svn/git-svn/ &&\n'> <'\tmv .git/svn/refs/remotes/git-svn .git/svn/ &&\n'> <'\trm -r .git/svn/refs\n'> ) } ) (C {(test_expect_success)} {(SQ <'old layout continues to work'>)} { (SQ <'\n'> <'\tsvn_cmd import -m- i "$svnrepo/b" &&\n'> <'\tgit svn rebase &&\n'> <'\techo a >> b/a &&\n'> <'\tgit add b/a &&\n'> <'\tgit commit -m- -a &&\n'> <'\tgit svn dcommit &&\n'> <'\t! test -d .git/svn/refs/ &&\n'> <'\ttest -e .git/svn/git-svn/\n'> ) } ) (C {(test_done)}) ] )