[squeak-dev] More pluggable dialog fun (was Re: FileChooser/SaverDialog)
tim Rowledge
tim at rowledge.org
Sat Nov 11 00:39:46 UTC 2017
And now the dialogs are in the latest packages *except* for the hooking up to saveAs…
To try that out, simply edit
SmalltalkImage>getFileNameFromUserSuggesting: aName
"Ask the user for a new image name"
| newName |
newName := UIManager default
filenameSaverRequest: 'New File Name?' translated
initialAnswer: aName.
newName ifNil: [^nil].
((FileDirectory default fileOrDirectoryExists: (self fullNameForImageNamed: newName)) or:
[FileDirectory default fileOrDirectoryExists: (self fullNameForChangesNamed: newName)]) ifTrue: [
(self confirm: ('{1} already exists. Overwrite?' translated format: {newName})) ifFalse: [^nil]].
^newName
tim
--
tim Rowledge; tim at rowledge.org; http://www.rowledge.org/tim
Fractured Idiom:- FUI GENERIS - What's mine is mine
More information about the Squeak-dev
mailing list
|