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

Node links: Openning them in the browser. There is still variations to explore, if the link contains a file or a reference to an image.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2016-12-19 18:24:06 +00:00
parent 6259931a09
commit 08d48aed12
2 changed files with 18 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
repository/Grafoscopio/GrafoscopioNode.class.st
View File

@ -696,6 +696,12 @@ GrafoscopioNode >> title [
^ header ^ header
] ]
{ #category : #operation }
GrafoscopioNode >> visitLastLink [
links ifNil: [ self inform: 'This node has no associated links to visit'. ^ self ].
[WebBrowser openOn: self lastLink] fork.
]
{ #category : #'add/remove nodes' } { #category : #'add/remove nodes' }
GrafoscopioNode >> visitedGoTo: aCollection [ GrafoscopioNode >> visitedGoTo: aCollection [
"Stores the current node in a collection and recursively stores its children" "Stores the current node in a collection and recursively stores its children"

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

@ -289,6 +289,12 @@ GrafoscopioNotebook >> newWindowMainMenu [
description: 'Togle: code <--> text'; description: 'Togle: code <--> text';
icon: MendaIcons new smalltalkCodeIcon; icon: MendaIcons new smalltalkCodeIcon;
action: [ self toggleCodeNode ] ]. action: [ self toggleCodeNode ] ].
group addItem: [ :item |
item
name: nil;
description: 'Visit link';
icon: Smalltalk ui icons glamorousRight;
action: [ self visitNodeLink ] ].
group addItem: [ :item | group addItem: [ :item |
item item
name: nil; name: nil;
@ -612,6 +618,12 @@ GrafoscopioNotebook >> updateForSpecialHeader [
self updateBodyFor: currentNode self updateBodyFor: currentNode
] ]
{ #category : #'editing nodes' }
GrafoscopioNotebook >> visitNodeLink [
tree highlightedItem content visitLastLink.
]
{ #category : #accessing } { #category : #accessing }
GrafoscopioNotebook >> windowMainMenu [ GrafoscopioNotebook >> windowMainMenu [
^ windowMainMenu ^ windowMainMenu