[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