Fixing Open from the Internet menu and functionality.
This commit is contained in:
parent
fe07118f84
commit
d781ecd873
@ -400,7 +400,7 @@ GrafoscopioDockingBar class >> showSettings [
|
||||
Transcript show: pandoc
|
||||
]
|
||||
|
||||
{ #category : #'graphical interface' }
|
||||
{ #category : #accessing }
|
||||
GrafoscopioDockingBar class >> start [
|
||||
"Creates a custom docking bar for grafoscopio on top, for shorcuts to the most used actions,
|
||||
and as a fixed place for asking for help, external tools and grafoscopio updates and about"
|
||||
@ -411,7 +411,7 @@ GrafoscopioDockingBar class >> start [
|
||||
launchMenu
|
||||
add: 'New notebook' target: (GrafoscopioNotebook new) selector: #openDefault;
|
||||
add: 'Notebook from file...' target: (GrafoscopioNotebook new) selector: #openFromFileSelector;
|
||||
add: 'Notebook from Internet...' target: (GrafoscopioNotebook new) selector: #openFromUrlUI;
|
||||
add: 'Notebook from the Internet...' target: (GrafoscopioNotebook new) selector: #openFromUrlUI;
|
||||
add: 'Recent notebooks...' target: self selector: #openFromRecentlyUsed;
|
||||
add: 'Example notebooks...' target: self selector: #messageNotImplementedYet;
|
||||
add: 'Roassal visualizations gallery' target: (RTExampleBrowser new) selector: #open;
|
||||
|
@ -269,8 +269,9 @@ GrafoscopioNotebook >> findAndReplace [
|
||||
currentNode := tree highlightedItem content.
|
||||
replaceGUI := GrafoscopioReplace new.
|
||||
replaceGUI openWithSpec.
|
||||
replaceGUI ok state
|
||||
whenChangedDo: [
|
||||
replaceGUI ok
|
||||
on: [ ]
|
||||
do: [
|
||||
findString := replaceGUI returnValues at: 'find'.
|
||||
replaceString := replaceGUI returnValues at: 'replace'.
|
||||
currentNode find: findString andReplaceWith: replaceString. ]
|
||||
|
@ -49,7 +49,8 @@ GrafoscopioReplace >> find: anObject [
|
||||
GrafoscopioReplace >> initializePresenter [
|
||||
"Here we need to deal with changes in the OK button to send messages about the
|
||||
state of the 'find' and 'replace' variables or do nothing if 'Cancel' is pressed."
|
||||
self shouldBeImplemented
|
||||
ok whenStateChangedDo: [
|
||||
Transcript show: 'OK Clicked!' ]
|
||||
|
||||
]
|
||||
|
||||
@ -63,6 +64,7 @@ GrafoscopioReplace >> initializeWidgets [
|
||||
autoAccept: true.
|
||||
ok := self newButton
|
||||
label: 'OK';
|
||||
state: false;
|
||||
action: [
|
||||
ok state: true.
|
||||
self window close. ] .
|
||||
|
Loading…
Reference in New Issue
Block a user