#BUGFIX by cg
authorClaus Gittinger <cg@exept.de>
Mon, 15 Oct 2018 11:42:10 +0200
changeset 8518 f7fd6d8ee737
parent 8517 b32d1a4a3c24
child 8519 15b16159731f
#BUGFIX by cg class: ViewStyle added: #superPack:
ViewStyle.st
--- a/ViewStyle.st	Mon Oct 15 11:41:56 2018 +0200
+++ b/ViewStyle.st	Mon Oct 15 11:42:10 2018 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -262,6 +264,15 @@
     ^ viewGrey
 ! !
 
+!ViewStyle methodsFor:'accessing-internals'!
+
+superPack:anotherResourcePack
+    superPacks := { anotherResourcePack }.
+
+    "Created: / 29-01-1998 / 22:43:09 / cg"
+    "Modified (comment): / 10-10-2018 / 14:14:39 / sr"
+! !
+
 !ViewStyle methodsFor:'error handling'!
 
 nonexistingFileRead