author | Jakub Nesveda <jakubnesveda@seznam.cz> |
Sun, 19 Oct 2014 14:55:14 +0200 | |
changeset 704 | 340954b48789 |
parent 698 | 525d39491ecc |
child 726 | d0dec838632e |
permissions | -rw-r--r-- |
645
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
1 |
"{ Package: 'jn:refactoring_custom' }" |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
2 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
3 |
CustomCodeGeneratorOrRefactoringTestCase subclass:#CustomCodeSelectionToResourceTranslationTests |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
4 |
instanceVariableNames:'' |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
5 |
classVariableNames:'' |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
6 |
poolDictionaries:'' |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
7 |
category:'Interface-Refactoring-Custom-Tests' |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
8 |
! |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
9 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
10 |
!CustomCodeSelectionToResourceTranslationTests methodsFor:'accessing'! |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
11 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
12 |
generatorOrRefactoring |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
13 |
^ CustomCodeSelectionToResourceTranslation new |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
14 |
! ! |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
15 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
16 |
!CustomCodeSelectionToResourceTranslationTests methodsFor:'tests'! |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
17 |
|
698
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
18 |
test_available_in_code_view_perspective |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
19 |
| perspective | |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
20 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
21 |
perspective := CustomPerspective codeViewPerspective. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
22 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
23 |
self assert: (generatorOrRefactoring class availableInPerspective:perspective). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
24 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
25 |
"Created: / 15-10-2014 / 08:10:35 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
26 |
! |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
27 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
28 |
test_available_in_context_empty |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
29 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
30 |
self deny: (generatorOrRefactoring class availableInContext: context). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
31 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
32 |
"Modified: / 15-10-2014 / 09:32:27 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
33 |
! |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
34 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
35 |
test_available_in_context_empty_selected_codes |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
36 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
37 |
context selectedCodes: (Array |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
38 |
with: CustomSourceCodeSelection new |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
39 |
). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
40 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
41 |
self deny: (generatorOrRefactoring class availableInContext: context). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
42 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
43 |
"Created: / 15-10-2014 / 09:37:41 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
44 |
! |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
45 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
46 |
test_available_in_context_with_selected_codes |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
47 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
48 |
context selectedCodes: (Array |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
49 |
with: (CustomSourceCodeSelection new |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
50 |
selectedInterval: (1 to: 5); |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
51 |
currentSourceCode: 'selector_05 ^ 5'; |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
52 |
yourself) |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
53 |
). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
54 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
55 |
self assert: (generatorOrRefactoring class availableInContext: context). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
56 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
57 |
"Created: / 15-10-2014 / 09:41:44 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
58 |
! |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
59 |
|
645
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
60 |
test_code_selection_replaced_by_resource_translation_01 |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
61 |
| expectedSource originalSource codeSelection class | |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
62 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
63 |
originalSource := 'selector |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
64 |
self information: ''Translate this''. |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
65 |
^ self.'. |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
66 |
|
688
6bd18ba5e56c
completed - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
650
diff
changeset
|
67 |
class := model createClassImmediate: 'DummyClassForTestCase01' instanceVariableNames: 'resources'. |
6bd18ba5e56c
completed - rewriting code generators to replace CustomSourceCodeBuilder, but RBClass, RBMetaclass, RBNamespace and CodeGenerator
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
650
diff
changeset
|
68 |
model createMethodImmediate: class source: originalSource. |
645
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
69 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
70 |
codeSelection := CustomSourceCodeSelection new. |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
71 |
codeSelection |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
72 |
currentSourceCode: originalSource; |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
73 |
selectedClass: class; |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
74 |
selectedInterval: (32 to: 48); |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
75 |
selectedMethod: (class compiledMethodAt: #selector); |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
76 |
selectedSelector: #selector. |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
77 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
78 |
context selectedCodes: (Array with: codeSelection). |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
79 |
generatorOrRefactoring executeInContext: context. |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
80 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
81 |
expectedSource := 'selector |
650
7514c13d6dd8
working refactoring CustomCodeSelectionToResourceTranslation - wraps code selection in code editor (codeView) to translation call, finished code selection search/replace API in CustomRefactoryBuilder
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
645
diff
changeset
|
82 |
self information:(resources string:''Translate this''). |
645
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
83 |
^ self.'. |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
84 |
|
650
7514c13d6dd8
working refactoring CustomCodeSelectionToResourceTranslation - wraps code selection in code editor (codeView) to translation call, finished code selection search/replace API in CustomRefactoryBuilder
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
645
diff
changeset
|
85 |
self assertMethodSource:expectedSource atSelector:#selector forClass:class |
645
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
86 |
|
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
87 |
"Created: / 23-08-2014 / 20:09:06 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
650
7514c13d6dd8
working refactoring CustomCodeSelectionToResourceTranslation - wraps code selection in code editor (codeView) to translation call, finished code selection search/replace API in CustomRefactoryBuilder
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
645
diff
changeset
|
88 |
"Modified: / 26-08-2014 / 23:13:22 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
698
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
89 |
! |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
90 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
91 |
test_code_selection_replaced_by_resource_translation_02 |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
92 |
| expectedSource originalSource codeSelection class | |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
93 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
94 |
originalSource := 'selector |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
95 |
self information: self theInformation. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
96 |
^ self.'. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
97 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
98 |
class := model createClassImmediate: 'DummyClassForTestCase01' instanceVariableNames: 'resources'. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
99 |
model createMethodImmediate: class source: originalSource. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
100 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
101 |
codeSelection := CustomSourceCodeSelection new. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
102 |
codeSelection |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
103 |
currentSourceCode: originalSource; |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
104 |
selectedClass: class; |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
105 |
selectedInterval: (32 to: 51); |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
106 |
selectedMethod: (class compiledMethodAt: #selector); |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
107 |
selectedSelector: #selector. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
108 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
109 |
context selectedCodes: (Array with: codeSelection). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
110 |
generatorOrRefactoring executeInContext: context. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
111 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
112 |
expectedSource := 'selector |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
113 |
self information:(resources string:self theInformation). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
114 |
^ self.'. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
115 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
116 |
self assertMethodSource:expectedSource atSelector:#selector forClass:class |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
117 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
118 |
"Created: / 15-10-2014 / 09:45:08 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
119 |
! |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
120 |
|
704
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
121 |
test_code_selection_replaced_by_resource_translation_with_keep_package |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
122 |
| expectedSource originalSource codeSelection class method compiledMethod | |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
123 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
124 |
originalSource := 'selector |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
125 |
self information: self theInformation. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
126 |
^ self.'. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
127 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
128 |
class := model createClassImmediate: 'DummyClassForTestCase01' instanceVariableNames: 'resources'. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
129 |
method := model createMethodImmediate: class source: originalSource. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
130 |
method package: #some_package. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
131 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
132 |
codeSelection := CustomSourceCodeSelection new. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
133 |
codeSelection |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
134 |
currentSourceCode: originalSource; |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
135 |
selectedClass: class; |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
136 |
selectedInterval: (32 to: 51); |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
137 |
selectedMethod: (class compiledMethodAt: #selector); |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
138 |
selectedSelector: #selector. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
139 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
140 |
context selectedCodes: (Array with: codeSelection). |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
141 |
generatorOrRefactoring executeInContext: context. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
142 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
143 |
expectedSource := 'selector |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
144 |
self information:(resources string:self theInformation). |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
145 |
^ self.'. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
146 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
147 |
self assertMethodSource:expectedSource atSelector:#selector forClass:class. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
148 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
149 |
compiledMethod := class compiledMethodAt: #selector. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
150 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
151 |
self assert: #some_package = (compiledMethod package). |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
152 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
153 |
"Created: / 16-10-2014 / 21:46:23 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
154 |
! |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
155 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
156 |
test_code_selection_replaced_by_resource_translation_with_wrong_selection |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
157 |
| expectedSource originalSource codeSelection class | |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
158 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
159 |
originalSource := 'method: arg |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
160 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
161 |
arg ifNil: [ |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
162 |
self warn: ''nil''. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
163 |
] |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
164 |
ifNotNil: [ self information: ''info'' ]'. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
165 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
166 |
class := model createClassImmediate: 'DummyClassForTestCase01' instanceVariableNames: 'resources'. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
167 |
model createMethodImmediate: class source: originalSource. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
168 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
169 |
codeSelection := CustomSourceCodeSelection new. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
170 |
codeSelection |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
171 |
currentSourceCode: originalSource; |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
172 |
selectedClass: class; |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
173 |
selectedInterval: (8 to: 10); |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
174 |
selectedMethod: (class compiledMethodAt: #method:); |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
175 |
selectedSelector: #selector. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
176 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
177 |
context selectedCodes: (Array with: codeSelection). |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
178 |
generatorOrRefactoring executeInContext: context. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
179 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
180 |
expectedSource := 'method: arg |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
181 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
182 |
arg ifNil: [ |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
183 |
self warn: ''nil''. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
184 |
] |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
185 |
ifNotNil: [ self information: ''info'' ]'. |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
186 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
187 |
self assertMethodSource:expectedSource atSelector:#method: forClass:class |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
188 |
|
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
189 |
"Created: / 17-10-2014 / 22:31:16 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
190 |
! |
340954b48789
better comment in CustomNamespace >> execute
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
698
diff
changeset
|
191 |
|
698
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
192 |
test_not_available_in_class_perspective |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
193 |
| perspective | |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
194 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
195 |
perspective := CustomPerspective classPerspective. |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
196 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
197 |
self deny: (generatorOrRefactoring class availableInPerspective:perspective). |
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
198 |
|
525d39491ecc
show CustomCodeSelectionToResourceTranslation refactoring only in code view menu and only if some code is selected
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
688
diff
changeset
|
199 |
"Created: / 15-10-2014 / 08:11:43 / Jakub Nesveda <nesvejak@fit.cvut.cz>" |
645
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
200 |
! ! |
38a38c28ddb1
work in progress - create selection replace API in CustomRefactoryBuilder and CustomCodeSelectionToResourceTranslation
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff
changeset
|
201 |