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

Find & Replace: Closing windows implemented.

Browse Source
This commit is contained in:
Offray Vladimir Luna Cárdenas 2017-09-16 19:16:01 +00:00
parent 9ae4f36ca8
commit 2b80b3ca50
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
repository/Grafoscopio/GrafoscopioReplace.class.st
View File

@ -55,10 +55,10 @@ GrafoscopioReplace >> initializeWidgets [
autoAccept: true. autoAccept: true.
ok := self newButton ok := self newButton
label: 'OK'; label: 'OK';
action: [ Transcript show: self find getText ]. action: [ Transcript show: self find getText, String cr ].
cancel := self newButton cancel := self newButton
label: 'Cancel'; label: 'Cancel';
action: [ super closeWindowAction ]. action: [ self window close ].
self focusOrder self focusOrder
add: find; add: find;
add: replace; add: replace;
@ -79,7 +79,7 @@ GrafoscopioReplace >> ok: anObject [
{ #category : #private } { #category : #private }
GrafoscopioReplace >> okToChange [ GrafoscopioReplace >> okToChange [
^ false ^ true
] ]
{ #category : #accessing } { #category : #accessing }