CustomManagerTests.st
author Jakub Nesveda <jakubnesveda@seznam.cz>
Sun, 25 Jan 2015 13:39:42 +0100
changeset 803 95cdac772759
parent 789 9349044a65e8
child 829 59bfd92fcef0
permissions -rw-r--r--
Fixed failing tests caused by new STX release * RBParser cannot parse expressions like #NameSpace::Class - changed to #'NameSpace::Class' * AddClassChange has renamed variables instanceVariableNames -> instanceVariableString, classVariableNames -> classVariableString
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
789
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     1
"{ Package: 'jn:refactoring_custom' }"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     2
803
95cdac772759 Fixed failing tests caused by new STX release
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 789
diff changeset
     3
"{ NameSpace: Smalltalk }"
95cdac772759 Fixed failing tests caused by new STX release
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 789
diff changeset
     4
789
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     5
TestCase subclass:#CustomManagerTests
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     6
	instanceVariableNames:'mock provider manager generatorClassMock'
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     7
	classVariableNames:''
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     8
	poolDictionaries:''
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     9
	category:'Interface-Refactoring-Custom-Tests'
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    10
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    11
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    12
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    13
!CustomManagerTests methodsFor:'initialization & release'!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    14
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    15
setUp
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    16
    super setUp.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    17
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    18
    mock := CustomMock new.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    19
    provider := mock mockOf: OrderedCollection.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    20
    provider compileMockMethod: 'generatorsAndRefactoringsDo: aBlock
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    21
        self do: aBlock'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    22
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    23
    manager := CustomManager new.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    24
    manager generatorsOrRefactoringsProvider: provider.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    25
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    26
    generatorClassMock := mock mockClassOf: Object.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    27
    mock createMockGetters: generatorClassMock forSelectors:
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    28
        {'label'. 'isAbstract'. 'availableInContext:'. 'availableInPerspective:'}.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    29
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    30
    "Modified: / 28-12-2014 / 15:34:55 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    31
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    32
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    33
tearDown
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    34
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    35
    mock unmockAll.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    36
    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    37
    super tearDown.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    38
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    39
    "Modified: / 28-12-2014 / 13:15:15 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    40
! !
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    41
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    42
!CustomManagerTests methodsFor:'private'!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    43
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    44
addGenerator: aLabel
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    45
    "Creates initialized code generator mock and adds it to managers generators"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    46
    | generator |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    47
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    48
    generator := generatorClassMock new
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    49
        objectAttributeAt: #isAbstract put: false;
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    50
        objectAttributeAt: #label put: aLabel;
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    51
        objectAttributeAt: #availableInContext: put: true;
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    52
        objectAttributeAt: #availableInPerspective: put: true;
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    53
        yourself.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    54
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    55
    manager generatorsOrRefactoringsProvider add: generator.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    56
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    57
    ^ generator
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    58
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    59
    "Created: / 28-12-2014 / 14:12:45 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    60
    "Modified: / 28-12-2014 / 15:36:22 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    61
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    62
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    63
collectionOfLabels: aCollection
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    64
    "Returns collection of labels from given collection"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    65
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    66
    ^ OrderedCollection streamContents: [ :stream |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    67
        aCollection do: [ :each | 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    68
            stream nextPut: each label
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    69
        ]
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    70
    ]
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    71
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    72
    "Created: / 28-12-2014 / 14:23:05 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    73
! !
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    74
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    75
!CustomManagerTests methodsFor:'tests'!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    76
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    77
test_current
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    78
    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    79
    self assert: manager class current notNil
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    80
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    81
    "Modified: / 28-12-2014 / 13:17:36 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    82
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    83
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    84
test_generators_and_refactorings
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    85
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    86
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    87
    expectedGenerators := OrderedCollection with: 'Generator_01' with: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    88
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    89
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    90
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    91
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    92
    actualGenerators := self collectionOfLabels: manager generatorsAndRefactorings.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    93
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    94
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    95
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    96
    "Modified: / 28-12-2014 / 14:23:40 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    97
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    98
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    99
test_generators_and_refactorings_do
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   100
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   101
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   102
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   103
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   104
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   105
    expectedGenerators := OrderedCollection with: provider first 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   106
                            with: provider last.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   107
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   108
    actualGenerators := OrderedCollection streamContents: [ :stream |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   109
        manager generatorsAndRefactoringsDo: [ :generator |  
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   110
            stream nextPut: generator
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   111
        ].
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   112
    ].                 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   113
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   114
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   115
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   116
    "Modified: / 28-12-2014 / 18:04:40 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   117
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   118
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   119
test_generators_and_refactorings_for_context
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   120
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   121
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   122
    expectedGenerators := OrderedCollection with: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   123
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   124
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   125
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   126
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   127
    provider first objectAttributeAt: #availableInContext: put: false.    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   128
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   129
    actualGenerators := self collectionOfLabels: (manager 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   130
                            generatorsAndRefactoringsForContext: nil).
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   131
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   132
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   133
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   134
    "Modified: / 28-12-2014 / 15:38:38 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   135
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   136
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   137
test_generators_and_refactorings_for_context_do
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   138
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   139
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   140
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   141
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   142
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   143
    expectedGenerators := OrderedCollection with: provider first. 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   144
    provider last objectAttributeAt: #availableInContext: put: false.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   145
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   146
    actualGenerators := OrderedCollection streamContents: [ :stream |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   147
        manager generatorsAndRefactoringsForContext: nil do: [ :generator |  
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   148
            stream nextPut: generator
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   149
        ].
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   150
    ].                 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   151
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   152
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   153
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   154
    "Modified: / 28-12-2014 / 18:08:01 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   155
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   156
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   157
test_generators_and_refactorings_for_perspective    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   158
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   159
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   160
    expectedGenerators := OrderedCollection with: 'Generator_01'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   161
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   162
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   163
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   164
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   165
    provider second objectAttributeAt: #availableInPerspective: put: false.    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   166
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   167
    actualGenerators := self collectionOfLabels: (manager 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   168
                            generatorsAndRefactoringsForPerspective: nil).
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   169
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   170
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   171
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   172
    "Modified: / 28-12-2014 / 17:07:58 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   173
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   174
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   175
test_generators_and_refactorings_for_perspective_do
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   176
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   177
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   178
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   179
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   180
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   181
    expectedGenerators := OrderedCollection with: provider first. 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   182
    provider last objectAttributeAt: #availableInPerspective: put: false.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   183
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   184
    actualGenerators := OrderedCollection streamContents: [ :stream |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   185
        manager generatorsAndRefactoringsForPerspective: nil do: [ :generator |  
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   186
            stream nextPut: generator
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   187
        ].
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   188
    ].                 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   189
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   190
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   191
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   192
    "Modified: / 28-12-2014 / 18:08:52 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   193
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   194
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   195
test_generators_and_refactorings_select_01    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   196
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   197
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   198
    expectedGenerators := OrderedCollection with: 'Generator_01'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   199
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   200
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   201
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   202
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   203
    provider second objectAttributeAt: #availableInPerspective: put: false.    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   204
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   205
    actualGenerators := self collectionOfLabels: (manager 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   206
                            generatorsAndRefactoringsSelect: [ :generator | 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   207
                                generator availableInPerspective: nil
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   208
                            ]).
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   209
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   210
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   211
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   212
    "Modified (comment): / 28-12-2014 / 17:54:06 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   213
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   214
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   215
test_generators_and_refactorings_select_02    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   216
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   217
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   218
    expectedGenerators := OrderedCollection new.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   219
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   220
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   221
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   222
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   223
    provider second objectAttributeAt: #availableInPerspective: put: false.    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   224
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   225
    actualGenerators := self collectionOfLabels: (manager 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   226
                            generatorsAndRefactoringsSelect: [ :generator | 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   227
                                false
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   228
                            ]).
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   229
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   230
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   231
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   232
    "Created: / 28-12-2014 / 17:55:22 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   233
!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   234
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   235
test_generators_and_refactorings_select_03    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   236
    | expectedGenerators actualGenerators |
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   237
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   238
    expectedGenerators := OrderedCollection with: 'Generator_01' with: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   239
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   240
    self addGenerator: 'Generator_01';
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   241
        addGenerator: 'Generator_02'.
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   242
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   243
    provider second objectAttributeAt: #availableInPerspective: put: false.    
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   244
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   245
    actualGenerators := self collectionOfLabels: (manager 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   246
                            generatorsAndRefactoringsSelect: [ :generator | 
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   247
                                true
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   248
                            ]).
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   249
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   250
    self assert: expectedGenerators = actualGenerators
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   251
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   252
    "Created: / 28-12-2014 / 17:55:56 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   253
! !
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   254
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   255
!CustomManagerTests class methodsFor:'documentation'!
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   256
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   257
version_HG
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   258
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   259
    ^ '$Changeset: <not expanded> $'
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   260
! !
9349044a65e8 Added changeable provider of generator or refactoring classes for CustomManager
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
   261