[squeak-dev] The Trunk: HelpSystem-Core-mt.138.mcz

commits at source.squeak.org commits at source.squeak.org
Wed Jan 19 10:40:48 UTC 2022

Marcel Taeumel uploaded a new version of HelpSystem-Core to project The Trunk:

==================== Summary ====================

Name: HelpSystem-Core-mt.138
Author: mt
Time: 19 January 2022, 11:40:48.900855 am
UUID: 0b09067b-f04c-7149-8220-bf015b1c1c8a
Ancestors: HelpSystem-Core-mt.137

Fixes GetText export: "withCRs translated" -> "translated withCRs"

=============== Diff against HelpSystem-Core-mt.137 ===============

Item was changed:
  ----- Method: ClassBasedHelpTopic>>okToWriteSelector: (in category 'editing') -----
  okToWriteSelector: aSelector
  	| method |
  	method := self helpClass theMetaClass compiledMethodAt: aSelector ifAbsent: [^ true].
  	(method hasPragma: #generated) ifTrue: [^ true].
  	^ (Project uiManager
  		chooseFrom: (#('Override it' 'Don''t override, but browse it' 'Cancel') collect: #translated)
  		values: { [true]. [method browse. false]. [false] }
+ 		title: ('This will override the existing method\{1}!!\Proceed anyway?' translated withCRs asText
- 		title: ('This will override the existing method\{1}!!\Proceed anyway?' withCRs translated asText
  			format: {method reference asText
  				addAttribute: (TextLink new classAndMethod: method reference);
  				yourself })) value == true!

More information about the Squeak-dev mailing list