--- a/test/MCFileInTest.st Wed May 29 00:01:05 2013 +0200
+++ b/test/MCFileInTest.st Wed May 29 01:59:40 2013 +0200
@@ -4,7 +4,7 @@
instanceVariableNames:'stream expected diff'
classVariableNames:''
poolDictionaries:''
- category:'Monticello-Tests'
+ category:'SCM-Monticello-Tests'
!
@@ -40,12 +40,13 @@
!
assertFileOutFrom: writerClass canBeFiledInWith: aBlock
-self halt.
(writerClass on: stream) writeSnapshot: self mockSnapshot.
self alterInitialState.
self assertSuccessfulLoadWith: aBlock.
self mockPackage unload.
self assertSuccessfulLoadWith: aBlock.
+
+ "Modified: / 29-05-2013 / 00:55:28 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
assertInitializersCalled
@@ -55,25 +56,29 @@
!
assertSuccessfulLoadWith: aBlock
-self halt.
stream reset.
aBlock value.
self assertNoChange.
self assertInitializersCalled.
+
+ "Modified: / 29-05-2013 / 00:55:36 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
testStWriter
self
assertFileOutFrom: MCStWriter
- canBeFiledInWith: [self halt. stream fileIn].
+ canBeFiledInWith: [stream fileIn].
+
+ "Modified: / 29-05-2013 / 00:55:45 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
!MCFileInTest class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/goodies/monticello/test/MCFileInTest.st,v 1.2 2009-10-26 17:31:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/test/MCFileInTest.st,v 1.3 2013-05-28 23:59:40 vrany Exp $'
!
version_CVS
- ^ '$Header: /cvs/stx/stx/goodies/monticello/test/MCFileInTest.st,v 1.2 2009-10-26 17:31:15 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/goodies/monticello/test/MCFileInTest.st,v 1.3 2013-05-28 23:59:40 vrany Exp $'
! !
+