CypressAbstractReaderWriter.st
changeset 15 31a33727c629
child 17 d387df3d4e46
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/CypressAbstractReaderWriter.st	Mon Sep 17 21:34:55 2012 +0000
@@ -0,0 +1,42 @@
+"{ Package: 'stx:goodies/cypress' }"
+
+Object subclass:#CypressAbstractReaderWriter
+	instanceVariableNames:'repository notice'
+	classVariableNames:''
+	poolDictionaries:''
+	category:'Cypress-New-Reader & Writer'
+!
+
+
+!CypressAbstractReaderWriter class methodsFor:'instance creation'!
+
+onDirectory: aStringOrFilename
+    ^self onRepository: (CypressRepository on: aStringOrFilename)
+
+    "Created: / 17-09-2012 / 17:17:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+onRepository: aCypressRepository
+    ^self new repository: aCypressRepository
+
+    "Created: / 17-09-2012 / 17:16:30 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!CypressAbstractReaderWriter methodsFor:'accessing'!
+
+repository
+    ^ repository
+!
+
+repository:aCypressRepository
+    repository := aCypressRepository.
+    notice := repository properties at: 'copyrightLine' ifAbsent:[nil].
+
+    "Modified: / 17-09-2012 / 17:20:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
+!CypressAbstractReaderWriter class methodsFor:'documentation'!
+
+version_SVN
+    ^ '$Id::                                                                                                                        $'
+! !