ChangeSet.st
changeset 1083 e3ac808d06e8
parent 1081 5d8001052312
child 1085 e4912b831447
--- a/ChangeSet.st	Thu Oct 18 18:51:15 2001 +0200
+++ b/ChangeSet.st	Fri Oct 26 10:02:48 2001 +0200
@@ -557,6 +557,23 @@
     "Created: / 27.10.1997 / 13:52:54 / cg"
 ! !
 
+!ChangeSet class methodsFor:'Compatibility - VW'!
+
+component: component definition: anObject change: changeSymbol
+    "Include indication that a class/namespace was added or removed
+     from a CodeComponent." 
+
+    self 
+        changed:#'component:definition:change:'
+        with:
+            ( Array 
+                    with: component
+                    with: anObject
+                    with: changeSymbol
+            )
+
+! !
+
 !ChangeSet class methodsFor:'queries'!
 
 current
@@ -582,6 +599,21 @@
     "Created: / 4.2.2000 / 18:30:59 / cg"
 !
 
+component: component definition: anObject change: changeSymbol
+    "Include indication that a class/namespace was added or removed
+     from a CodeComponent." 
+
+    self 
+        changed:#'component:definition:change:'
+        with:
+            ( Array 
+                    with: component
+                    with: anObject
+                    with: changeSymbol
+            )
+
+!
+
 reorganizeSystem
     "dummy here"
 
@@ -944,5 +976,5 @@
 !ChangeSet class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.61 2001-10-18 13:02:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic3/ChangeSet.st,v 1.62 2001-10-26 08:02:48 cg Exp $'
 ! !