--- a/FileApplicationNoteBook.st Thu Feb 13 12:20:36 2003 +0100
+++ b/FileApplicationNoteBook.st Thu Feb 13 12:30:09 2003 +0100
@@ -3820,26 +3820,27 @@
"ask for save changes
"
- |answer string|
+ |answer string arg|
answer := false.
self modifiedChannel value ifTrue:[
self itemChanged value ifTrue:[
- string := self fileName asString allBold , ' was changed by someone else'
- , Character cr , 'Save your changes anyway ?'
+ arg := self fileName baseName allBold.
+ string := '%1 was changed by someone else.\Save your changes anyway ?'
].
self itemRemoved value ifTrue:[
- string := self fileName asString allBold , ' was removed by someone else'
- , Character cr , 'Save your changes anyway ?'
+ arg := self fileName baseName allBold.
+ string := '%1 was removed by someone else.\Save your changes anyway ?'
].
string isNil ifTrue:[
- string := 'Save changed file ' , self fileName asString , ' ?'
- ]
+ arg := self fileName baseName allBold.
+ string := 'Save changed file %1 ?'.
+ ].
].
string notNil ifTrue:[
- answer := (Dialog confirmWithCancel:string).
+ answer := (Dialog confirmWithCancel:(resources string:string with:arg) withCRs).
answer isNil ifTrue:[^ answer].
- answer == true ifTrue:[
+ answer ifTrue:[
self accept
] ifFalse:[
self setContents.
@@ -4256,7 +4257,7 @@
((textEditorChangeModificationTime = time) not) ifTrue:[
"/ contents changed by someone else
textEditorChangeModificationTime := time.
- self notify:item fileName asString, ' was changed by someone else'.
+ self notify:(resources string:'%1 was changed by someone else.' with:item fileName baseName allBold).
self itemChanged value:true.
].
]
@@ -4928,5 +4929,5 @@
!FileApplicationNoteBook class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.59 2003-02-13 09:34:06 penk Exp $'
+ ^ '$Header: /cvs/stx/stx/libtool/FileApplicationNoteBook.st,v 1.60 2003-02-13 11:30:09 cg Exp $'
! !