SmallSense__PO.st
changeset 346 88c1d211f9be
parent 345 3623c9cde340
child 353 b1170c3a4585
--- a/SmallSense__PO.st	Thu Jun 19 15:19:22 2014 +0100
+++ b/SmallSense__PO.st	Fri Jun 20 13:56:46 2014 +0100
@@ -179,14 +179,6 @@
     "Modified: / 20-05-2014 / 11:32:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
-subject
-    <resource: #obsolete>
-
-    self error: 'Should no longer be sent'.
-
-    "Modified: / 20-05-2014 / 10:16:01 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-!
-
 subject:anObject
     <resource: #obsolete>
 
@@ -195,6 +187,19 @@
     "Modified: / 20-05-2014 / 10:16:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!PO methodsFor:'accessing-private'!
+
+subject
+    "Return the real object for which the receiver
+     is a presentor.
+
+     For internal usage only."
+
+    ^ self subclassResponsibility
+
+    "Modified: / 20-06-2014 / 11:09:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !PO methodsFor:'completion'!
 
 insert