Synchronizing before testing installation in other image.
This commit is contained in:
parent
51fd003964
commit
ca88b70241
|
|
@ -431,11 +431,11 @@ GrafoscopioDockingBar class >> start [
|
|||
|
||||
helpMenu := MenuMorph new.
|
||||
helpMenu
|
||||
add: 'Tutorial (Spanish)' target: (GrafoscopioDocs new) selector: #openTutorial;
|
||||
add: 'Manual' target: (GrafoscopioDocs new) selector: #openManual;
|
||||
add: 'Manual (PDF)' target: (GrafoscopioDocs new) selector: #openPDFManual;
|
||||
add: 'Dataviz' target: (DatavizDocs new) selector: #openIntroNotebook;
|
||||
add: 'Dev''s notes' target: (GrafoscopioDocs new) selector: #openDevNotes;
|
||||
add: 'Tutorial (Spanish)' target: [GrafoscopioNotebook open: GrafoscopioDocs tutorial] selector: #value;
|
||||
add: 'Manual' target: [ GrafoscopioNotebook open: GrafoscopioDocs manual ] selector: #value;
|
||||
add: 'Manual (PDF)' target: GrafoscopioDocs selector: #openPDFManual;
|
||||
add: 'Dataviz' target: [ GrafoscopioNotebook open: DatavizDocs introNotebook ] selector: #value ;
|
||||
add: 'Dev''s notes' target: [GrafoscopioNotebook open: GrafoscopioDocs devNotes ] selector: #value;
|
||||
add: 'About Grafoscopio' target: self selector: #messageAbout.
|
||||
|
||||
dockingBar := DockingBarMorph new.
|
||||
|
|
@ -584,14 +584,14 @@ GrafoscopioDockingBar class >> updateRecentNotebooksWith: aFileReference [
|
|||
|
||||
{ #category : #updating }
|
||||
GrafoscopioDockingBar class >> updateSystem [
|
||||
| tmp1 tmp2 |
|
||||
| tmp1 |
|
||||
tmp1 := UIManager default
|
||||
question: 'Do you wish to update all Grafoscopio and its co-dependencies ?'
|
||||
title: 'Grafoscopio update'.
|
||||
tmp1
|
||||
ifNotNil: [ tmp1
|
||||
ifTrue: [ tmp2 := self.
|
||||
tmp2
|
||||
ifTrue: [
|
||||
self
|
||||
updateGrafoscopio;
|
||||
updateDataviz.
|
||||
GrafoscopioDocumentation updateAll.
|
||||
|
|
|
|||
|
|
@ -7,6 +7,41 @@ Class {
|
|||
#category : #Grafoscopio
|
||||
}
|
||||
|
||||
{ #category : #operation }
|
||||
GrafoscopioDocs class >> devNotes [
|
||||
"I'm just an alias to ease the operation. I need to know wich is the index of the notebook
|
||||
I want to return, as defined on instance initialize method"
|
||||
| docs |
|
||||
docs := self newDefault.
|
||||
^ (docs localPlace fullName, '/', (docs documents at: 3)) asFileReference.
|
||||
]
|
||||
|
||||
{ #category : #operation }
|
||||
GrafoscopioDocs class >> manual [
|
||||
"I'm just an alias to ease the operation. I need to know wich is the index of the notebook
|
||||
I want to open, as defined on method."
|
||||
| docs |
|
||||
docs := self newDefault.
|
||||
^ (docs localPlace fullName, '/', (docs documents at: 2)) asFileReference.
|
||||
]
|
||||
|
||||
{ #category : #operation }
|
||||
GrafoscopioDocs class >> openPDFManual [
|
||||
"I open the documentation in PDF format."
|
||||
| pdfManual |
|
||||
pdfManual := self newDefault documents at: 4.
|
||||
WebBrowser openOn: (self localPlace / pdfManual) fullName.
|
||||
]
|
||||
|
||||
{ #category : #operation }
|
||||
GrafoscopioDocs class >> tutorial [
|
||||
"I'm just an alias to ease the operation. I need to know wich is the index of the notebook
|
||||
I want to return, as defined on instance initialize method"
|
||||
| docs |
|
||||
docs := self newDefault.
|
||||
^ (docs localPlace fullName, '/', (docs documents at: 1)) asFileReference.
|
||||
]
|
||||
|
||||
{ #category : #initialization }
|
||||
GrafoscopioDocs >> initialize [
|
||||
"I model the important documents that belong to the Grafoscopio documentation.
|
||||
|
|
@ -23,31 +58,3 @@ GrafoscopioDocs >> initialize [
|
|||
add: 'Docs/En/dev-notes.ston';
|
||||
add: 'Docs/En/Books/Manual/manual.pdf'.
|
||||
]
|
||||
|
||||
{ #category : #operation }
|
||||
GrafoscopioDocs >> openDevNotes [
|
||||
"I'm just an alias to ease the operation. I need to know wich is the index of the notebook
|
||||
I want to open, as defined on method."
|
||||
self openNotebookAt: 3
|
||||
]
|
||||
|
||||
{ #category : #operation }
|
||||
GrafoscopioDocs >> openManual [
|
||||
"I'm just an alias to ease the operation. I need to know wich is the index of the notebook
|
||||
I want to open, as defined on method."
|
||||
self openNotebookAt: 2
|
||||
]
|
||||
|
||||
{ #category : #operation }
|
||||
GrafoscopioDocs >> openPDFManual [
|
||||
"I open the documentation in PDF format."
|
||||
| pdfManual |
|
||||
pdfManual := self documents at: 4.
|
||||
WebBrowser openOn: (self localPlace / pdfManual) fullName.
|
||||
]
|
||||
|
||||
{ #category : #operation }
|
||||
GrafoscopioDocs >> openTutorial [
|
||||
"I open the proper notebook in the adecuate documentation."
|
||||
self openNotebookAt: 1
|
||||
]
|
||||
|
|
|
|||
|
|
@ -47,6 +47,16 @@ GrafoscopioNotebook class >> defaultSpec [
|
|||
bc add: #body; add: #links height: self toolbarHeight ]]]
|
||||
]
|
||||
|
||||
{ #category : #'as yet unclassified' }
|
||||
GrafoscopioNotebook class >> newDefault [
|
||||
^ self new.
|
||||
]
|
||||
|
||||
{ #category : #'instance creation' }
|
||||
GrafoscopioNotebook class >> open: aFileReference [
|
||||
self newDefault openFromFile: aFileReference
|
||||
]
|
||||
|
||||
{ #category : #'editing nodes' }
|
||||
GrafoscopioNotebook >> addNode [
|
||||
| addedNode |
|
||||
|
|
@ -416,10 +426,9 @@ GrafoscopioNotebook >> openDefault [
|
|||
]
|
||||
|
||||
{ #category : #persistence }
|
||||
GrafoscopioNotebook >> openFromFile: aFileName [
|
||||
"I open a notebook from a file named aFileName containing a grafoscopio tree"
|
||||
GrafoscopioNotebook >> openFromFile: aFileReference [
|
||||
|
||||
self workingFile: aFileName.
|
||||
self workingFile: aFileReference.
|
||||
self notebook: ((STON fromString: self workingFile contents) at: 1) parent.
|
||||
self title: self workingFile basenameWithIndicator, ' | Grafoscopio notebook'.
|
||||
self notebookContent: self notebook.
|
||||
|
|
|
|||
Loading…
Reference in New Issue