Improving visualization techniques.
This commit is contained in:
parent
736155c5e9
commit
4210215215
@ -611,6 +611,26 @@ TiddlyWiki >> networkView [
|
|||||||
^ view
|
^ view
|
||||||
]
|
]
|
||||||
|
|
||||||
|
{ #category : #accessing }
|
||||||
|
TiddlyWiki >> networkViewHighlightingCreator: creatorName [
|
||||||
|
| view |
|
||||||
|
view nodes
|
||||||
|
stencil: [ :each |
|
||||||
|
| color size |
|
||||||
|
color := (each creator = creatorName)
|
||||||
|
ifTrue: [ Color blue ]
|
||||||
|
ifFalse: [ Color lightGray ].
|
||||||
|
size := 5 @ 5.
|
||||||
|
BlElement new background: color; size: size;
|
||||||
|
when: BlClickEvent
|
||||||
|
do: [ :e | e currentTarget phlow spawnTool: each ] ];
|
||||||
|
with: self tiddlers.
|
||||||
|
view edges
|
||||||
|
connectToAll: #linkedTiddlers.
|
||||||
|
view layout force.
|
||||||
|
^ view
|
||||||
|
]
|
||||||
|
|
||||||
{ #category : #accessing }
|
{ #category : #accessing }
|
||||||
TiddlyWiki >> oldestCreatedTiddler [
|
TiddlyWiki >> oldestCreatedTiddler [
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user