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

About: New code for about.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2016-04-12 10:47:06 +00:00
parent 4185ae05bd
commit db72fe731c
4 changed files with 83 additions and 73 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
repository/Grafoscopio/DynamicDict.class.st
View File

@ -86,25 +86,6 @@ DynamicDict >> rebuildWithCodeLayoutFor: key [
yourself. yourself.
self needRebuild: false. self needRebuild: false.
content needRebuild: true. content needRebuild: true.
Transcript show: 'código + ', self content asString, String cr.
self buildWithSpecLayout: newLayout.
]
{ #category : #'as yet unclassified' }
DynamicDict >> rebuildWithTextLayout [
| newLayout |
content := self newText.
newLayout := SpecLayout composed
newRow: [:row |
row
add: #list right: 0.7;
add: #content left: 0.3];
yourself.
self needRebuild: false.
list needRebuild: false.
content needRebuild: true.
Transcript show: 'texto + ', self content asString, String cr..
self buildWithSpecLayout: newLayout. self buildWithSpecLayout: newLayout.
] ]
@ -122,7 +103,6 @@ DynamicDict >> rebuildWithTextLayoutFor: key [
self needRebuild: false. self needRebuild: false.
list needRebuild: false. list needRebuild: false.
content needRebuild: true. content needRebuild: true.
Transcript show: 'texto + ', self content asString, String cr..
self buildWithSpecLayout: newLayout. self buildWithSpecLayout: newLayout.
] ]

92
repository/Grafoscopio/GrafoscopioBrowser.class.st
View File

@ -86,19 +86,10 @@ GrafoscopioBrowser class >> docDownloadFor: aDocumentType [
temporalBackup asFileReference exists ifTrue: [ temporalBackup asFileReference delete]. temporalBackup asFileReference exists ifTrue: [ temporalBackup asFileReference delete].
localDoc asFileReference renameTo: aDocumentType, '.temp.ston' localDoc asFileReference renameTo: aDocumentType, '.temp.ston'
]. ].
[: bar | self
bar title: 'Actualizando el ', aDocumentType,'...'. downloadingFrom: remoteDoc
[client := ZnClient new. withMessage: 'Actualizando el ', aDocumentType,'...'
client into: (rootFolder fullName, '/', (docInfo at: 'relativePath')).
get: remoteDoc;
signalProgress: true;
downloadTo: (rootFolder fullName, '/', (docInfo at: 'relativePath')). ]
on: HTTPProgress
do: [ :progress |
progress isEmpty ifFalse: [ bar current: progress percentage ].
progress resume ].
] asJob run.
] ]
{ #category : #'graphical interface' } { #category : #'graphical interface' }
@ -148,44 +139,45 @@ GrafoscopioBrowser class >> isDocUpdatedFor: aDocumentType [
GrafoscopioBrowser class >> messageAbout [ GrafoscopioBrowser class >> messageAbout [
"Shows the author, license, sponsors and main contributors to the project and point to further documentation on the web" "Shows the author, license, sponsors and main contributors to the project and point to further documentation on the web"
UIManager default alert: LongMessageDialogWindow new
'_.:| Grafoscopio |:._', entryText:
(String with: Character cr), '_.:| Grafoscopio |:._',
'(c) Copyright 2014-2016 by Offray Vladimir Luna Cárdenas', (String with: Character cr),
(String with: Character cr), '(c) Copyright 2014-2016 by Offray Vladimir Luna Cárdenas',
'Covered under MIT license.', (String with: Character cr),
(String with: Character cr), 'Covered under MIT license.',
(String with: Character cr), (String with: Character cr),
'[ Sponsors ]', (String with: Character cr),
(String with: Character cr), '[ Sponsors ]',
'mutabiT | www.mutabit.com ', (String with: Character cr),
(String with: Character cr), 'mutabiT | www.mutabit.com ',
'HiTec Lab, Fundación Universitaria Los Libertadores | www.ulibertadores.edu.co ', (String with: Character cr),
(String with: Character cr), 'HiTec Lab, Fundación Universitaria Los Libertadores | www.ulibertadores.edu.co ',
(String with: Character cr), (String with: Character cr),
'[ Thanks to ]', (String with: Character cr),
(String with: Character cr), '[ Thanks to ]',
'HackBo, Hackerspace Bogota | http://hackbo.co', (String with: Character cr),
(String with: Character cr), 'HackBo, Hackerspace Bogota | http://hackbo.co',
'// Regular workshops attendees \\ (String with: Character cr),
Rafael Medida, Iván Pulido, Camilo Hurtado', '// Regular workshops attendees \\
(String with: Character cr), Rafael Medida, Iván Pulido, Camilo Hurtado',
'// Coffe talk (mostly about grafoscopio) \\ (String with: Character cr),
Yanneth Gil, Andrés Calderón, Luis Alejandro Bernal', '// Coffe talk (mostly about grafoscopio) \\
(String with: Character cr), Yanneth Gil, Andrés Calderón, Luis Alejandro Bernal',
'// Pharo, Moose and Agile Visualization communities \\ (String with: Character cr),
Tudor Girba, Alexandre Bergel, Nicolai Hess, Peter Uhnák, Milton Mamani ', '// Pharo, Moose and Agile Visualization communities \\
(String with: Character cr), Tudor Girba, Alexandre Bergel, Nicolai Hess, Peter Uhnák, Milton Mamani ',
'// Family support while writing, coding & travelling (among others!) \\ (String with: Character cr),
'// Family support while writing, coding & travelling (among others!) \\
Divian Luna, Hilda Cárdenas', Divian Luna, Hilda Cárdenas',
(String with: Character cr), (String with: Character cr),
(String with: Character cr), (String with: Character cr),
'For further details and versions go to:', 'For further details and versions go to:',
(String with: Character cr), (String with: Character cr),
(String with: Character cr), (String with: Character cr),
'http://mutabit.com/grafoscopio' 'http://mutabit.com/grafoscopio';
title: 'About Grafoscopio';
title: 'About Grafoscopio'. open.
] ]
{ #category : #'graphical interface' } { #category : #'graphical interface' }

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

@ -239,6 +239,23 @@ GrafoscopioGUI >> initializePresenter [
] ]
] ]
{ #category : #initialization }
GrafoscopioGUI >> initializePresenter2 [
tree whenSelectedItemChanged: [:node |
node tag = 'código'
ifTrue: [ ]
ifFalse: [ ]
].
nodeHeader acceptBlock: [ :text|
tree selectedItem
ifNotNil: [:x |
x content: text.
self updateTree
]
]
]
{ #category : #initialization } { #category : #initialization }
GrafoscopioGUI >> initializeWidgets [ GrafoscopioGUI >> initializeWidgets [
@ -409,6 +426,22 @@ GrafoscopioGUI >> updateBody [
] ]
]
{ #category : #update }
GrafoscopioGUI >> updateBody2 [
"update the displayed content associated to the body of a node"
(tree selectedItem content tags = 'código')
ifTrue: [
^ nodeBody text: 'I should be playground because I am tagged as ', tree selectedItem content tags
]
ifFalse: [
"nodeBody := self newText."
^ nodeBody text: tree selectedItem content body
]
] ]
{ #category : #update } { #category : #update }

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

@ -160,16 +160,21 @@ GrafoscopioNode >> asSton [
{ #category : #initialization } { #category : #initialization }
GrafoscopioNode >> becomeDefaultTestTree [ GrafoscopioNode >> becomeDefaultTestTree [
| node1 node2 | | node1 node2 node3 |
self level: 0. self level: 0.
self header: 'Arbol principal'. self header: 'Arbol principal'.
node1 := GrafoscopioNode new node1 := GrafoscopioNode new
header: 'Markup'; header: 'Markup';
body: 'I am just a node with markup'. body: 'I am just a node with markup';
level: 1.
node2 := GrafoscopioNode new node2 := GrafoscopioNode new
header: 'Code'; header: 'Code';
body: 'PharoTutorial openPharoZenWorkspace'; body: 'PharoTutorial openPharoZenWorkspace';
tagAs: 'código'. tagAs: 'código'.
node3 := GrafoscopioNode new
header: 'Child';
body: 'Just testing'.
node1 addNode: node3.
self self
addNode: node1; addNode: node1;
addNode: node2. addNode: node2.