--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/FileInChange.st	Tue Jun 28 23:15:15 2011 +0200
@@ -0,0 +1,50 @@
+"{ Package: 'stx:libbasic3' }"
+
+Change subclass:#FileInChange
+	instanceVariableNames:'file'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'System-Changes'
+!
+
+
+!FileInChange class methodsFor:'instance creation'!
+
+file: aStringOrFilename
+
+    ^self new file: aStringOrFilename
+
+    "Created: / 27-08-2009 / 10:36:48 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!FileInChange methodsFor:'accessing'!
+
+file
+    ^ file
+!
+
+file:aStringOrfFilename
+    file := aStringOrfFilename.
+! !
+
+!FileInChange methodsFor:'printing & storing'!
+
+printOn:aStream
+    "append a printed representation if the receiver to the argument, aStream"
+
+    aStream 
+        nextPutAll:'FileIn: ';
+        nextPutAll: file asString storeString
+
+    "Modified: / 27-08-2009 / 10:35:55 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!FileInChange class methodsFor:'documentation'!
+
+version_CVS
+    ^ '$Header: /cvs/stx/stx/libbasic3/FileInChange.st,v 1.1 2011-06-28 21:15:15 vrany Exp $'
+!
+
+version_SVN
+    ^ ' Id: FileInChange.st 1813 2009-10-26 21:58:45Z vranyj1  '
+! !