[squeak-dev] The Trunk: Tools-ct.1062.mcz
commits at source.squeak.org
commits at source.squeak.org
Wed Dec 15 16:34:45 UTC 2021
Christoph Thiede uploaded a new version of Tools to project The Trunk:
http://source.squeak.org/trunk/Tools-ct.1062.mcz
==================== Summary ====================
Name: Tools-ct.1062
Author: ct
Time: 23 August 2021, 12:50:44.009904 pm
UUID: 0b5bc84d-5488-0141-ac9a-5e29d5894a41
Ancestors: Tools-mt.1061
Fixes a bug in process browser when canceling the "change priority" dialog.
Also improves multilingual support.
=============== Diff against Tools-mt.1061 ===============
Item was changed:
----- Method: ProcessBrowser>>changePriority (in category 'process actions') -----
changePriority
| str newPriority nameAndRules |
nameAndRules := self nameAndRulesForSelectedProcess.
+ nameAndRules third ifFalse: [
+ ^ self inform: ('Nope, won''t change priority of {1}' translated format: {nameAndRules first})].
+
- nameAndRules third
- ifFalse: [self inform: 'Nope, won''t change priority of ' , nameAndRules first.
- ^ self].
str := UIManager default
+ request: 'New priority' translated
+ initialAnswer: selectedProcess priority asString.
+ str isEmptyOrNil ifTrue: [^ self].
+
- request: 'New priority'
- initialAnswer: selectedProcess priority asString.
newPriority := str asNumber asInteger.
+ newPriority ifNil: [^ self].
- newPriority
- ifNil: [^ self].
(newPriority < 1
or: [newPriority > Processor highestPriority])
+ ifTrue: [^ self inform: 'Bad priority' translated].
+
- ifTrue: [self inform: 'Bad priority'.
- ^ self].
self class setProcess: selectedProcess toPriority: newPriority.
+ self updateProcessList.!
- self updateProcessList!
More information about the Squeak-dev
mailing list
|