#REFACTORING by exept
authorClaus Gittinger <cg@exept.de>
Tue, 25 Feb 2020 12:30:34 +0100
changeset 19520 32c1e071b13c
parent 19519 ebad2cd5f8fe
child 19521 b1750a64febf
#REFACTORING by exept class: ChangesBrowser eliminate withCRs - use c-strings changed: #update:with:from: #writeBackChanges
ChangesBrowser.st
--- 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
         ]