There was an error while loading. Please reload this page.
2 parents 6b897d3 + 69e27ab commit 4d0e484Copy full SHA for 4d0e484
1 file changed
src/MuTalk-Model/MTMethodInstaller.class.st
@@ -12,10 +12,13 @@ Class {
12
{ #category : 'installing' }
13
MTMethodInstaller >> install: aMethod for: selector in: aClass withProtocol: methodProtocol [
14
15
- aClass
16
- addAndClassifySelector: selector
17
- withMethod: aMethod
18
- inProtocol: methodProtocol
+ SystemVersion current major >= 14
+ ifTrue: [
+ aClass methodInstaller
+ protocol: methodProtocol;
19
+ logged: false;
20
+ install: aMethod into: aClass compiler: nil ]
21
+ ifFalse: [ aClass addAndClassifySelector: selector withMethod: aMethod inProtocol: methodProtocol ]
22
]
23
24
0 commit comments