Offray/Grafoscopio
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Cut, copy & paste node tree editing icons.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2016-12-17 14:04:21 +00:00
parent 38f7380ff1
commit ea63230b0e
2 changed files with 22 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
repository/Grafoscopio/GrafoscopioGUI.class.st
View File

@ -21,11 +21,22 @@ Class {
], ],
#classInstVars : [ #classInstVars : [
'dockingBar', 'dockingBar',
'recentNotebooks' 'recentNotebooks',
'cacheNode'
], ],
#category : #'Grafoscopio-UI' #category : #'Grafoscopio-UI'
} }
{ #category : #accessing }
GrafoscopioGUI class >> cacheNode [
^ cacheNode
]
{ #category : #accessing }
GrafoscopioGUI class >> cacheNode: anObject [
cacheNode := anObject
]
{ #category : #specs } { #category : #specs }
GrafoscopioGUI class >> defaultSpec [ GrafoscopioGUI class >> defaultSpec [
<spec: #default> <spec: #default>

14
repository/Grafoscopio/GrafoscopioNotebook.class.st
View File

@ -203,14 +203,20 @@ GrafoscopioNotebook >> newWindowMainMenu [
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Undo'; description: 'Cut';
icon: Smalltalk ui icons smallUndoIcon; icon: Smalltalk ui icons smallCutIcon;
action: [ self inform: 'To be implemented...' ] ]. action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
description: 'Redo'; description: 'Copy';
icon: Smalltalk ui icons smallRedoIcon; icon: Smalltalk ui icons smallCopyIcon;
action: [ self inform: 'To be implemented...' ] ].
group addItem: [ :item |
item
name: nil;
description: 'Paste';
icon: Smalltalk ui icons smallPasteIcon;
action: [ self inform: 'To be implemented...' ] ]]; action: [ self inform: 'To be implemented...' ] ]];
addGroup: [ :group | addGroup: [ :group |
group addItem: [ :item | group addItem: [ :item |