#REFACTORING by exept
class: ChangesBrowser
eliminate withCRs - use c-strings
changed:
#update:with:from:
#writeBackChanges
--- a/ChangesBrowser.st Tue Feb 25 12:27:48 2020 +0100
+++ b/ChangesBrowser.st Tue Feb 25 12:30:34 2020 +0100
@@ -1819,7 +1819,7 @@
self raiseDeiconified.
box := YesNoBox new.
- box title:('The modified changelist has not been written back to the change file.\\Write change file before exiting ?') withCRs.
+ box title:(c'The modified changelist has not been written back to the change file.\n\nWrite change file before exiting ?').
box okText:(resources string:'Write') noText:(resources string:'Don''t write').
box yesAction:[self writeBackChanges]
noAction:[].
@@ -4828,7 +4828,7 @@
|inFilename inStream outStream stamp encoding tempFilename|
editingClassSource ifTrue:[
- (self confirm:'You are editing a classes sourceFile (not a changeFile) !!\\Are you certain, you want to overwrite it ?' withCRs)
+ (self confirm:c'You are editing a classes sourceFile (not a changeFile) !!\n\nAre you certain, you want to overwrite it ?')
ifFalse:[
^ false
]