Skip to content

Commit 11213ff

Browse files
committed
add a source view to the tonel method definition
1 parent 6f2bfcf commit 11213ff

File tree

1 file changed

+11
-0
lines changed

1 file changed

+11
-0
lines changed

src/GToolkit-VirtualMachine-SomeBindings/SomeTonelMethodDefinition.class.st

Lines changed: 11 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -37,6 +37,17 @@ SomeTonelMethodDefinition >> gtDisplayOn: stream [
3737
nextPutAll: selector
3838
]
3939

40+
{ #category : #'as yet unclassified' }
41+
SomeTonelMethodDefinition >> gtSourceFor: aView [
42+
<gtView>
43+
^ aView textEditor
44+
title: 'Source';
45+
priority: 5;
46+
aptitude: BrGlamorousCodeEditorAptitude;
47+
styler: BrRBTextStyler new;
48+
text: [ source ]
49+
]
50+
4051
{ #category : #'as yet unclassified' }
4152
SomeTonelMethodDefinition >> isClassSide [
4253
^ methodType = 'class'

0 commit comments

Comments
 (0)