author | Claus Gittinger <cg@exept.de> |
Tue, 08 May 2018 19:58:20 +0200 | |
changeset 1043 | aeecdb5610e4 |
parent 812 | ae7459c6e758 |
child 1121 | c5661215109c |
permissions | -rw-r--r-- |
6 | 1 |
"{ Package: 'stx:goodies/monticello/test' }" |
2 |
||
3 |
MCTestCase subclass:#MCInitializationTest |
|
4 |
instanceVariableNames:'' |
|
5 |
classVariableNames:'' |
|
6 |
poolDictionaries:'' |
|
812
ae7459c6e758
Tests moved to category SCM-Monticello-Tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
6
diff
changeset
|
7 |
category:'SCM-Monticello-Tests' |
6 | 8 |
! |
9 |
||
10 |
||
11 |
!MCInitializationTest class methodsFor:'as yet unclassified'! |
|
12 |
||
13 |
isAbstract |
|
14 |
^ (Smalltalk classNamed: #MczInstaller) isNil |
|
15 |
||
16 |
"Modified: / 16-11-2006 / 16:43:53 / cg" |
|
17 |
! ! |
|
18 |
||
19 |
!MCInitializationTest methodsFor:'as yet unclassified'! |
|
20 |
||
21 |
tearDown |
|
22 |
(MCWorkingCopy forPackage: self mockPackage) unregister |
|
23 |
! |
|
24 |
||
25 |
testWorkingCopy |
|
26 |
MczInstaller storeVersionInfo: self mockVersion. |
|
27 |
MCWorkingCopy initialize. |
|
28 |
MCWorkingCopy allManagers |
|
29 |
detect: [:man | man package name = self mockPackage name] |
|
30 |
ifNone: [self assert: false] |
|
31 |
! ! |
|
32 |
||
33 |
!MCInitializationTest class methodsFor:'documentation'! |
|
34 |
||
35 |
version |
|
812
ae7459c6e758
Tests moved to category SCM-Monticello-Tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
6
diff
changeset
|
36 |
^ '$Header: /cvs/stx/stx/goodies/monticello/test/MCInitializationTest.st,v 1.2 2013-05-29 00:01:07 vrany Exp $' |
6 | 37 |
! ! |
812
ae7459c6e758
Tests moved to category SCM-Monticello-Tests
Jan Vrany <jan.vrany@fit.cvut.cz>
parents:
6
diff
changeset
|
38 |