--- a/Change.st	Tue Jun 28 23:09:44 2011 +0200
+++ b/Change.st	Tue Jun 28 23:13:31 2011 +0200
@@ -74,6 +74,15 @@
 
 !
 
+changeLanguage
+
+    "Answer the language of the receiver. Since changesets 
+    are now supported only for Smalltalk, return SmalltalkLanguage
+    unconditionally"
+
+    ^SmalltalkLanguage instance
+!
+
 changeSelector
     ^ nil
 
@@ -89,6 +98,19 @@
     "Created: / 6.2.1998 / 13:06:56 / cg"
 !
 
+delta
+
+    "Returns a delta to current state as symbol:
+        #+ .....the subject is to be added to the image (new)
+        #- .....the subject is to be removed from the image (old)
+        #= .....the image is up to date
+        #~ .....change version and image version differ
+        #? .....delta is unknown or N/A for this kind of change
+    "
+
+    ^#? "We don't know how to compute delta for generic change"
+!
+
 file
     ^ nil "/ to be added as instvar
 !
@@ -196,6 +218,32 @@
     "Modified: / 25-07-2006 / 11:22:46 / cg"
 ! !
 
+
+!Change methodsFor:'enumerating'!
+
+do: aBlock
+
+    ^aBlock value: self
+
+    "Created: / 29-10-2010 / 14:02:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!Change methodsFor:'fileout'!
+
+basicFileOutOn: aStream
+
+    aStream 
+        cr;
+        nextPutAllAsChunk: self source; 
+        cr;
+        nextPutChunkSeparator; cr
+!
+
+fileOutOn: aStream
+
+    self removed ifFalse:[self basicFileOutOn: aStream]
+! !
+
 !Change methodsFor:'printing & storing'!
 
 printStringWithoutClassName
@@ -212,6 +260,7 @@
 
 ! !
 
+
 !Change methodsFor:'queries'!
 
 isForGeneratedSubject
@@ -278,6 +327,12 @@
     "Created: / 7.2.1998 / 19:26:50 / cg"
 !
 
+isCompositeChange
+    ^ false
+
+    "Created: / 7.2.1998 / 19:26:50 / cg"
+!
+
 isDoIt
     ^ false
 
@@ -360,10 +415,10 @@
 
 !Change class methodsFor:'documentation'!
 
-version
-    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.48 2010-08-07 17:11:30 cg Exp $'
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.49 2011-06-28 21:13:31 vrany Exp $'
 !
 
-version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic3/Change.st,v 1.48 2010-08-07 17:11:30 cg Exp $'
+version_SVN
+    ^ ' Id: Change.st 1867 2011-06-08 21:57:08Z vranyj1  '
 ! !