@@ -48,7 +48,8 @@ Method TestPull()
48
48
do ..WriteFile (remoteDir _" /cls/TestGit/SampleClass2.cls" ," Class TestGit.SampleClass2 {}" )
49
49
do $zf (-100 ," /SHELL" ," git" ," init" ,remoteDir )
50
50
do $zf (-100 ," /SHELL" ," git" , " -C" , remoteDir , " add" , " ." )
51
- do $zf (-100 ," /SHELL" ," git" , " -C" , remoteDir , " commit" , " -m" , " initial commit in remote for unit test" )
51
+ do $zf (-
100 ,
" /SHELL" ,
" git" ,
" -C" ,
remoteDir ,
" commit" ,
" --author" ,
" unit test <[email protected] >"
52
+ ," -m" , " initial commit in remote for unit test" )
52
53
// initialize local repo, cloning remote.
53
54
$$$ThrowOnError(##class (SourceControl.Git.Utils ).Clone (remoteDir _" /.git" ))
54
55
// import all and confirm classes exist
@@ -63,7 +64,8 @@ Method TestPull()
63
64
do ..WriteFile (remoteDir _" /cls/TestGit/SampleClass2.cls" ," Class TestGit.SampleClass2 { Parameter foo = " " bar" " ; }" )
64
65
do ..WriteFile (remoteDir _" /cls/TestGit/SampleClass3.cls" ," Class TestGit.SampleClass3 {}" )
65
66
do $zf (-100 ," /SHELL" ," git" , " -C" , remoteDir , " add" , " ." )
66
- do $zf (-100 ," /SHELL" ," git" , " -C" , remoteDir , " commit" , " -m" , " delete, modify, and add classes on remote" )
67
+ do $zf (-
100 ,
" /SHELL" ,
" git" ,
" -C" ,
remoteDir ,
" commit" ,
" --author" ,
" unit test <[email protected] >"
68
+ , " -m" , " delete, modify, and add classes on remote" )
67
69
// pull on local and confirm changes were loaded.
68
70
$$$ThrowOnError(##class (SourceControl.Git.API ).Pull ())
69
71
do $$$AssertNotTrue($$$comClassDefined(" TestGit.SampleClass1" ))
0 commit comments