# HG changeset patch
# User tz
# Date 885578704 -3600
# Node ID 0d5a50fe59f455d8311f7363d2034d12c0b514ac
# Parent  7b19423c8b7999244fc7121b57bf60158e1f9f47
default value of info label set

diff -r 7b19423c8b79 -r 0d5a50fe59f4 ImageEditor.st
--- a/ImageEditor.st	Fri Jan 23 18:56:46 1998 +0100
+++ b/ImageEditor.st	Fri Jan 23 19:05:04 1998 +0100
@@ -1114,6 +1114,22 @@
     ^builder componentAt: #resourceSelectorInputField
 ! !
 
+!ImageEditor methodsFor:'active help'!
+
+defaultInfoLabel
+
+    |usedColors|
+    self image isNil ifTrue: [^'No image defined'].
+    self image colorMap isNil ifTrue: [usedColors := '?'] ifFalse: [usedColors := self image usedColors size].
+    ^self image width printString, 'x',
+        self image height printString, 'x',
+        (2 raisedTo: self image depth) printString,
+        (self image mask notNil ifTrue: [' (mask + '] ifFalse: ['(']),
+        usedColors printString,
+        ' used colors)'
+
+! !
+
 !ImageEditor methodsFor:'aspects'!
 
 imageIsLoaded
@@ -1366,16 +1382,7 @@
 
 updateInfoLabel
 
-    |usedColors|
-    self image colorMap isNil ifTrue: [usedColors := '?'] ifFalse: [usedColors := self image usedColors size].
-    self valueOfInfoLabel value:
-        self image width printString, 'x',
-        self image height printString, 'x',
-        (2 raisedTo: self image depth) printString,
-        (self image mask notNil ifTrue: [' (mask + '] ifFalse: ['(']),
-        usedColors printString,
-        ' used colors)'
-
+    self valueOfInfoLabel value: self defaultInfoLabel
 
 !