#QUALITY by stefan
authorStefan Vogel <sv@exept.de>
Fri, 06 Mar 2020 12:57:48 +0100
changeset 6836 95967bf98f8e
parent 6835 205350eb439d
child 6837 0247bc167e3a
#QUALITY by stefan class: Label changed: #form: #layout: #logo:
Label.st
--- a/Label.st	Fri Mar 06 12:56:46 2020 +0100
+++ b/Label.st	Fri Mar 06 12:57:48 2020 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -1060,6 +1062,7 @@
 
     <resource:#obsolete>
 
+    self obsoleteMethodWarning.
     self label:aForm
 !
 
@@ -1180,6 +1183,7 @@
 
     <resource:#obsolete>
 
+    self obsoleteMethodWarning.
     self label:something
 ! !
 
@@ -1279,6 +1283,7 @@
 
     <resource:#obsolete>
 
+    self obsoleteMethodWarning.
     something isSymbol ifFalse:[^ super layout:something].
 
     self obsoleteMethodWarning:'use #adjust:'.