--- a/Method.st	Fri Oct 06 11:50:09 2006 +0200
+++ b/Method.st	Fri Oct 06 14:32:51 2006 +0200
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic' }"
 
 CompiledCode variableSubclass:#Method
@@ -1453,24 +1452,6 @@
     "Modified: 4.11.1996 / 22:58:28 / cg"
 ! !
 
-!Method methodsFor:'inspecting'!
-
-inspectorExtraAttributes
-    |d|
-
-    d := Dictionary new.
-    d add:'-code' -> [ String streamContents:[:s | self decompileTo:s] ].
-    d add:'-source' -> [ self source ].
-    d declareAllNewFrom:(super inspectorExtraAttributes ? #()).
-    ^ d
-
-    "
-     (Method compiledMethodAt:#inspectorExtraAttributes) inspect
-    "
-
-    "Created: / 18-09-2006 / 21:34:01 / cg"
-    "Modified: / 21-09-2006 / 09:08:24 / cg"
-! !
 
 !Method methodsFor:'printing & storing'!
 
@@ -2752,7 +2733,7 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.298 2006-09-22 16:13:29 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.299 2006-10-06 12:32:51 cg Exp $'
 ! !
 
 Method initialize!