CustomContext.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Fri, 14 Nov 2014 20:30:54 +0100
changeset 747 008860f4cbd4
parent 746 a25dc307d4e8
child 755 37d50424e347
permissions -rw-r--r--
Make CustomContext>>selectedMethods always return a collection of RBMethod... ....as opposed to real Method, which it used to return.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
535
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     1
"{ Package: 'jn:refactoring_custom' }"
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     2
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     3
Object subclass:#CustomContext
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     4
	instanceVariableNames:''
746
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
     5
	classVariableNames:'SmalltalkNamespace'
535
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     6
	poolDictionaries:''
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     7
	category:'Interface-Refactoring-Custom'
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     8
!
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
     9
582
8788d388f801 fix broken tests due to another default code formatting
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 541
diff changeset
    10
746
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    11
!CustomContext class methodsFor:'initialization'!
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    12
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    13
initialize
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    14
    "Invoked at system start or when the class is dynamically loaded."
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    15
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    16
    SmalltalkNamespace := RBNamespace onEnvironment: BrowserEnvironment new.
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    17
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    18
    "Modified: / 14-11-2014 / 19:28:33 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    19
! !
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    20
535
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    21
!CustomContext class methodsFor:'queries'!
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    22
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    23
isAbstract
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    24
    "Return if this class is an abstract class.
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    25
     True is returned here for myself only; false for subclasses.
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    26
     Abstract subclasses must redefine again."
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    27
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    28
    ^ self == CustomContext.
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    29
! !
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    30
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    31
!CustomContext methodsFor:'accessing-selection'!
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    32
541
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    33
selectedClassCategories
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    34
    "a collection with selected class categories"
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    35
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    36
    self subclassResponsibility
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    37
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    38
    "Created: / 05-05-2014 / 00:13:34 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    39
!
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    40
535
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    41
selectedClasses
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    42
    "a collection with selected classes"
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    43
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    44
    self subclassResponsibility
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    45
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    46
    "Created: / 26-04-2014 / 13:13:59 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    47
    "Modified (comment): / 26-04-2014 / 22:38:18 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
541
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    48
!
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    49
629
e85070e8c11b add code selection object (CustomSourceCodeSelection) with code, method, class... to CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 626
diff changeset
    50
selectedCodes
e85070e8c11b add code selection object (CustomSourceCodeSelection) with code, method, class... to CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 626
diff changeset
    51
    "a collection with source codes (CustomSourceCodeSelection) 
e85070e8c11b add code selection object (CustomSourceCodeSelection) with code, method, class... to CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 626
diff changeset
    52
    with selected interval (exact position in source code) and
e85070e8c11b add code selection object (CustomSourceCodeSelection) with code, method, class... to CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 626
diff changeset
    53
    corresponding class, method, selector."
626
a32e9bcc436e work in progress on first refactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 582
diff changeset
    54
a32e9bcc436e work in progress on first refactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 582
diff changeset
    55
    self subclassResponsibility
a32e9bcc436e work in progress on first refactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 582
diff changeset
    56
629
e85070e8c11b add code selection object (CustomSourceCodeSelection) with code, method, class... to CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 626
diff changeset
    57
    "Created: / 18-08-2014 / 21:28:10 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
626
a32e9bcc436e work in progress on first refactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 582
diff changeset
    58
!
a32e9bcc436e work in progress on first refactoring
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 582
diff changeset
    59
541
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    60
selectedMethods
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    61
    "a collection with selected methods"
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    62
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    63
    self subclassResponsibility
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    64
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    65
    "Created: / 05-05-2014 / 00:12:35 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    66
!
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    67
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    68
selectedPackages
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    69
    "a collection with selected packages"
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    70
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    71
    self subclassResponsibility
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    72
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    73
    "Created: / 05-05-2014 / 00:12:59 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    74
!
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    75
718
ed7514e9d76c rename selectedMethodProtocols to selecteProtocols in CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 685
diff changeset
    76
selectedProtocols
ed7514e9d76c rename selectedMethodProtocols to selecteProtocols in CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 685
diff changeset
    77
    "a collection with selected method protocols"
ed7514e9d76c rename selectedMethodProtocols to selecteProtocols in CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 685
diff changeset
    78
    
ed7514e9d76c rename selectedMethodProtocols to selecteProtocols in CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 685
diff changeset
    79
    self subclassResponsibility
ed7514e9d76c rename selectedMethodProtocols to selecteProtocols in CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 685
diff changeset
    80
ed7514e9d76c rename selectedMethodProtocols to selecteProtocols in CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 685
diff changeset
    81
    "Created: / 05-05-2014 / 00:14:23 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
ed7514e9d76c rename selectedMethodProtocols to selecteProtocols in CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 685
diff changeset
    82
!
ed7514e9d76c rename selectedMethodProtocols to selecteProtocols in CustomContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 685
diff changeset
    83
541
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    84
selectedVariables
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    85
    "a collection with selected variables"
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    86
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    87
    self subclassResponsibility
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    88
fb9cae8a5221 Add methods below to CustomContext, implement them in CustomSubContext
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 535
diff changeset
    89
    "Created: / 05-05-2014 / 00:14:59 / Jakub Nesveda <nesvejak@fit.cvut.cz>"
535
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    90
! !
9eb00f310701 CustomContext a comment for selected classes
Jakub Nesveda <jakubnesveda@seznam.cz>
parents:
diff changeset
    91
746
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    92
!CustomContext methodsFor:'private'!
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    93
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    94
asRBClass: cls 
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    95
    "For given real class, return a curresponding RBClass"
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    96
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    97
    ^ Object isMetaclass 
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    98
        ifTrue:[ SmalltalkNamespace metaclassNamed: cls theNonMetaclass name]
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
    99
        ifFalse:[SmalltalkNamespace classNamed: cls name ]
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
   100
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
   101
    "Ceated: / 14-11-2014 / 19:26:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
   102
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
   103
    "Created: / 14-11-2014 / 19:26:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
747
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   104
!
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   105
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   106
asRBMethod: aMethod
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   107
    | rbClass |
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   108
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   109
    rbClass := self asRBClass: aMethod mclass.
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   110
    ^ rbClass methodFor: aMethod selector
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   111
008860f4cbd4 Make CustomContext>>selectedMethods always return a collection of RBMethod...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 746
diff changeset
   112
    "Created: / 14-11-2014 / 20:17:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
746
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
   113
! !
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
   114
668
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   115
!CustomContext methodsFor:'testing'!
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   116
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   117
isInteractiveContext
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   118
    "Return true, if this generator/refactoring context is interactive,
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   119
     i.e., if it may interact with user (like asking for class name or
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   120
     similar) or not. 
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   121
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   122
     Generally speaking, only top-level context is interactive an only
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   123
     if generator/refactoring was triggerred from menu.
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   124
    "
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   125
    ^ false
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   126
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   127
    "Created: / 16-09-2014 / 09:22:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   128
! !
7f8cddf23efa Separated generator/refactoring initialization from actuall execution.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 629
diff changeset
   129
582
8788d388f801 fix broken tests due to another default code formatting
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 541
diff changeset
   130
!CustomContext class methodsFor:'documentation'!
8788d388f801 fix broken tests due to another default code formatting
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 541
diff changeset
   131
8788d388f801 fix broken tests due to another default code formatting
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 541
diff changeset
   132
version_HG
8788d388f801 fix broken tests due to another default code formatting
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 541
diff changeset
   133
8788d388f801 fix broken tests due to another default code formatting
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 541
diff changeset
   134
    ^ '$Changeset: <not expanded> $'
8788d388f801 fix broken tests due to another default code formatting
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 541
diff changeset
   135
! !
8788d388f801 fix broken tests due to another default code formatting
Jakub Nesveda <jakubnesveda@seznam.cz>
parents: 541
diff changeset
   136
746
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
   137
a25dc307d4e8 Make CustomContext>>selectedClasses always return a collection of RBClass...
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 718
diff changeset
   138
CustomContext initialize!