--- a/Behavior.st	Tue May 17 15:18:34 2011 +0200
+++ b/Behavior.st	Fri May 20 12:06:03 2011 +0200
@@ -4180,20 +4180,21 @@
      This is semantically equivalent to implements: (ST/80/Squeak compatibility).
 
      Hint:
-	Dont use this method to check if someone responds to a message -
-	use #canUnderstand: on the class or #respondsTo: on the instance
-	to do this.
+        Dont use this method to check if someone responds to a message -
+        use #canUnderstand: on the class or #respondsTo: on the instance
+        to do this.
 
      Caveat:
-	This simply checks for the selector being present in the classes
-	selector table - therefore, it does not care for ignoredMethods.
-	(but: you should not use this method for protocol-testing, anyway)."
+        This simply checks for the selector being present in the classes
+        selector table - therefore, it does not care for ignoredMethods.
+        (but: you should not use this method for protocol-testing, anyway)."
 
     ^ self methodDictionary includesIdenticalKey:aSelector
 
     "
      Object includesSelector:#==
      Object includesSelector:#murks
+     Object includesSelector:nil
     "
 
     "Modified: / 7.6.1996 / 14:27:24 / stefan"
@@ -4601,9 +4602,9 @@
 !Behavior class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.308 2011-03-19 13:45:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.309 2011-05-20 10:06:03 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.308 2011-03-19 13:45:35 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.309 2011-05-20 10:06:03 stefan Exp $'
 ! !