--- a/Method.st	Wed Jan 17 14:07:02 2018 +0100
+++ b/Method.st	Wed Jan 17 14:07:26 2018 +0100
@@ -2801,10 +2801,18 @@
 !
 
 isObsolete
-    "returns true, if this method is obsolete and should not be used any longer"
+    "returns true, if this method is obsolete and should not be used any longer.
+     Obsolete methods are marked by a:
+        <resource: #obsolete> 
+     attribute.
+    "
 
     ^ self isTaggedAs:#obsolete
 
+    "
+     SystemBrowser browseMethods:(Method allInstances select:#isObsolete)  
+    "
+
     "Modified: / 15-02-2017 / 17:15:25 / cg"
 !