tim Rowledge uploaded a new version of PreferenceBrowser to project The Inbox:
http://source.squeak.org/inbox/PreferenceBrowser-tpr.99.mcz==================== Summary ====================
Name: PreferenceBrowser-tpr.99
Author: tpr
Time: 26 December 2019, 4:33:31.502142 pm
UUID: c2266599-1145-4c08-8325-70b91ee5764e
Ancestors: PreferenceBrowser-tpr.98
Correct a tpyo and make the user messages more suited to translation protocol
=============== Diff against PreferenceBrowser-tpr.98 ===============
Item was changed:
----- Method: PreferenceBrowser>>loadFromDiskSelected (in category 'preferences search') -----
loadFromDiskSelected
"Ask the user to select a saved preference file to load. If none is chosen then do nothing. If there is an error during the loading inform the user; this may leave the preferences in a messy state as we aren't tracking where the erro ocurred"
+ (Project uiManager chooseFileMatching: '*.prefs' label: 'Select a preferences file to load' translated)
- (Project uiManager chooseFileMatching: '*.prefs' label: 'Select a preferences file to load')
ifNotNil: [:fname | Cursor wait
showWhile: [[preferences loadPreferencesFrom: fname]
on: Error
+ do: [:ex | self inform: ('There was an error restoring the preferences from file {1}.' translated format: {fname})]]] !
- do: [:ex | self inform: 'there was an error restoring the preferences from ' , fname]]] !
Item was changed:
----- Method: PreferenceBrowser>>saveToDiskSelected (in category 'preferences search') -----
saveToDiskSelected
"save the current preferences settings to file; the default is 'my.prefs' in the current default directory. Allow the user to choose where they should go"
+ (Project uiManager saveFilenameRequest: 'Save preferences to file' translated initialAnswer: 'my.prefs')
- (Project uiManager saveFilenameRequest: 'Save prefernces to file' initialAnswer: 'my.prefs')
ifNotNil: [:fname | Cursor wait
showWhile: [[preferences storePreferencesIn: fname]
on: Error
+ do: [:ex | self inform: ('there was an error storing your preferences to {1}' translated format: {fname}) ]]]!
- do: [:ex | self inform: 'there was an error storing your preferences to disk']]]!
Locked
