--- a/Character.st	Wed Sep 16 21:22:16 2009 +0200
+++ b/Character.st	Wed Sep 16 21:22:24 2009 +0200
@@ -570,21 +570,24 @@
 !Character methodsFor:'Compatibility-Dolphin'!
 
 isAlphaNumeric
-    "return true, if I am a letter or a digit
+    "Compatibility method - do not use in new code.
+     Return true, if I am a letter or a digit
      Please use isLetterOrDigit for compatibility reasons (which is ANSI)."
 
     ^ self isLetterOrDigit
 !
 
 isAlphabetic
-    "return true, if I am a letter.
+    "Compatibility method - do not use in new code.
+     Return true, if I am a letter.
      Please use isLetter for compatibility reasons (which is ANSI)."
 
     ^ self isLetter
 !
 
 isControl
-    "return true if I am a control character (i.e. ascii value < 32)"
+    "Compatibility method - do not use in new code.
+     Return true if I am a control character (i.e. ascii value < 32)"
 
     ^ self isControlCharacter
 !
@@ -600,7 +603,8 @@
 !
 
 isPunctuation
-    "the code below is not unicode aware"
+    "Compatibility method - do not use in new code.
+     The code below is not unicode aware"
 
     ^ (asciivalue between:16r21 and:16r40)
       or:[ (asciivalue between:16r5B and:16r60)
@@ -2767,5 +2771,5 @@
 !Character class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.138 2009-09-16 11:24:42 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Character.st,v 1.139 2009-09-16 19:22:24 cg Exp $'
 ! !