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

Minor changes from a new image (last one become irresponsive).

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2016-06-26 21:01:36 +00:00
parent c9a27dee85
commit 24f32911b2
2 changed files with 2 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -258,9 +258,9 @@ GrafoscopioGUI class >> startDockingBar [
launchMenu := MenuMorph new. launchMenu := MenuMorph new.
launchMenu launchMenu
add: 'New notebook' target: GrafoscopioNotebook selector: #new; add: 'New notebook' target: (GrafoscopioNotebook new) selector: #open;
add: 'Notebook from file...' target: (GrafoscopioNotebook new) selector: #openFromFileSelector; add: 'Notebook from file...' target: (GrafoscopioNotebook new) selector: #openFromFileSelector;
add: 'Notebook from Internet...' target: (GrafoscopioNotebook new) selector: #openFromUrlUI; add: 'Notebook from Internet...' target: (self new) selector: #openFromUrlUI;
add: 'Recent notebooks...' target: self selector: #openFromRecentlyUsed; add: 'Recent notebooks...' target: self selector: #openFromRecentlyUsed;
add: 'Example notebooks...' target: self selector: #messageNotImplementedYet; add: 'Example notebooks...' target: self selector: #messageNotImplementedYet;
add: 'Roassal visualizations gallery' target: (RTExampleBrowser new) selector: #open; add: 'Roassal visualizations gallery' target: (RTExampleBrowser new) selector: #open;
@ -272,7 +272,6 @@ GrafoscopioGUI class >> startDockingBar [
add: 'Grafoscopio' target: self selector: #updateGrafoscopioUI; add: 'Grafoscopio' target: self selector: #updateGrafoscopioUI;
add: 'Documentation' target: self selector: #updateDocumentationUI; add: 'Documentation' target: self selector: #updateDocumentationUI;
add: 'DataViz package' target: self selector: #updateDatavizUI; add: 'DataViz package' target: self selector: #updateDatavizUI;
add: 'Graphical Interface' target: self selector: #updateUI;
add: 'Database engine' target: ExternalApp selector: #installSQLite32BitsUI; add: 'Database engine' target: ExternalApp selector: #installSQLite32BitsUI;
add: 'Pandoc path' target: ExternalApp selector: #configurePandoc; add: 'Pandoc path' target: ExternalApp selector: #configurePandoc;
add: 'Fossil path' target: ExternalApp selector: #configureFossil; add: 'Fossil path' target: ExternalApp selector: #configureFossil;

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

@ -46,15 +46,6 @@ GrafoscopioNotebook class >> defaultSpec [
bc add: #body ]]] bc add: #body ]]]
] ]
{ #category : #'instance creation' }
GrafoscopioNotebook class >> new [
| testTree nb |
testTree := GrafoscopioNode new becomeDefaultTestTree.
nb := self new.
nb notebookContent: testTree.
nb openWithSpec
]
{ #category : #accessing } { #category : #accessing }
GrafoscopioNotebook >> body [ GrafoscopioNotebook >> body [
^ body ^ body