--- a/CypressMethod.st	Thu Sep 13 14:58:01 2012 +0000
+++ b/CypressMethod.st	Mon Sep 17 18:05:30 2012 +0000
@@ -26,6 +26,10 @@
 
 !CypressMethod methodsFor:'accessing'!
 
+category
+    ^ category
+!
+
 klass
     ^ klass
 !
@@ -44,6 +48,10 @@
     ^self name
 
     "Created: / 11-09-2012 / 11:18:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+source
+    ^ source
 ! !
 
 !CypressMethod methodsFor:'initialization'!
@@ -64,29 +72,6 @@
     "Created: / 11-09-2012 / 00:05:31 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
-!CypressMethod methodsFor:'reading & writing'!
-
-readFrom:filename
-    "Initializes the receiver from directory/file named 'filename'"
-
-    ^ self shouldImplement
-!
-
-writeTo:filename notice:copyrightNotice
-    "Writes the receiver into given 'directory' with
-     copyrightNotice in each file"
-
-    filename writingFileDo:[:s|
-        s nextPut:$"; cr.
-        s nextPutAll: 'notice: '; nextPutAll: copyrightNotice; cr.
-        s nextPutAll: 'category: '; nextPutAll: category ? '* as yet unclassified *'; cr.
-        s nextPut:$"; cr.
-        s nextPutAll: source.
-    ].
-
-    "Modified: / 11-09-2012 / 11:36:22 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-! !
-
 !CypressMethod class methodsFor:'documentation'!
 
 version_SVN