# HG changeset patch
# User tm
# Date 995028905 -7200
# Node ID e658f77f88b2daf157c89f016a68ad49b01b73b9
# Parent  1788b004517607c7a4f97af74bf584cb90d83a9b
checkin from browser

diff -r 1788b0045176 -r e658f77f88b2 LabelAndIcon.st
--- a/LabelAndIcon.st	Wed Jul 04 10:35:29 2001 +0200
+++ b/LabelAndIcon.st	Fri Jul 13 14:55:05 2001 +0200
@@ -202,6 +202,10 @@
     "Created: 12.5.1996 / 20:00:58 / cg"
 !
 
+label:aString icon:anIcon
+    ^ self new icon:anIcon string:aString
+!
+
 new
     ^ self basicNew initialize
 
@@ -460,5 +464,5 @@
 !LabelAndIcon class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg2/LabelAndIcon.st,v 1.29 2001-07-02 12:41:27 martin Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg2/LabelAndIcon.st,v 1.30 2001-07-13 12:55:05 tm Exp $'
 ! !