diff -r 6c4fc06faadb -r c91c39976bef ImageEditor.st --- 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.