--- a/ImageEditor.st Tue Jul 12 22:21:37 2005 +0200
+++ b/ImageEditor.st Wed Jul 13 17:47:46 2005 +0200
@@ -3507,7 +3507,7 @@
cMap := img colorMap.
cMap isNil ifTrue:[
drawingColormap isNil ifTrue:[
- self information:'Image has no colormap.\The shown colorMap is for drawing only.' withCRs.
+ self information:(resources stringWithCRs:'Image has no colormap.\The shown colorMap is for drawing only.').
drawingColormap := OrderedCollection new.
].
drawingColormap add:newColor.
@@ -3524,7 +3524,7 @@
self warn:'No space for more colors in colormap.'.
^ self
].
- (self confirm:'No space for more colors in colormap.\Change depth ?' withCRs)
+ (self confirm:(resources stringWithCRs:'No space for more colors in colormap.\Change depth ?'))
ifFalse:[
^ self
].
@@ -3783,9 +3783,9 @@
useNearest := Dialog
confirmWithCancel:(resources
- string:'Image requires %1 colors.\ColorMap has only space for %2\\Use nearest (or map to first color) ?'
+ stringWithCRs:'Image requires %1 colors.\ColorMap has only space for %2\\Use nearest (or map to first color) ?'
with:usedColors size
- with:(1 bitShift:depth)) withCRs
+ with:(1 bitShift:depth))
labels:(resources array:#('Cancel' 'First' 'Nearest')).
useNearest isNil ifTrue:[
colorMapMode value:prevMode.
@@ -3799,8 +3799,8 @@
(usedColors conform:[:clr | newColorMap includes:clr]) ifFalse:[
useNearest := Dialog
confirmWithCancel:(resources
- string:'Not all colors are present in the new colormap.\\Map missing ones to nearest (or map to first color) ?'
- ) withCRs
+ stringWithCRs:'Not all colors are present in the new colormap.\\Map missing ones to nearest (or map to first color) ?'
+ )
labels:(resources string:#('Cancel' 'First' 'Nearest')).
useNearest isNil ifTrue:[
colorMapMode value:prevMode.
@@ -4151,7 +4151,7 @@
img := self image.
cMap := img colorMap.
cMap isNil ifTrue:[
- self warn:('Image has no colormap.\Please change the colorMap mode first.' withCRs).
+ self warn:(resources stringWithCRs:'Image has no colormap.\Please change the colorMap mode first.').
^ self
].
@@ -4240,7 +4240,7 @@
img := self image.
cMap := img colorMap.
cMap isNil ifTrue:[
- self warn:('Image has no colormap.\Please change the colorMap mode first.' withCRs).
+ self warn:(resources stringWithCRs:'Image has no colormap.\Please change the colorMap mode first.').
^ nil
].
^ cMap at:cmapIndex.