# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1511266281 -3600
# Node ID 3178ec13e6bf3de89a1f076379956ac949e55b17
# Parent  31e44508c406e5da9fab8b430a961a7a6ac4f880
#DOCUMENTATION by cg
class: ClassDescription
comment/format in: #printOutMethodProtocol:on:

class: ClassDescription class
comment/format in:
	#methodRedefinitionNotification
	#packageRedefinitionNotification

diff -r 31e44508c406 -r 3178ec13e6bf ClassDescription.st
--- a/ClassDescription.st	Tue Nov 21 13:11:15 2017 +0100
+++ b/ClassDescription.st	Tue Nov 21 13:11:21 2017 +0100
@@ -386,11 +386,13 @@
 
 methodRedefinitionNotification
     "return the signal raised when a method is about to be installed
-     which redefines an existing method and the methods packages are not
+     which redefines an existing method and the method's packages are not
      equal. This helps when filing in alien code, to prevent existing
      methods to be overwritten or redefined by incompatible methods"
 
     ^ ClassDescription::MethodRedefinitionNotification
+
+    "Modified (comment): / 21-11-2017 / 12:59:38 / cg"
 !
 
 methodRedefinitionSignal
@@ -438,11 +440,13 @@
 
 packageRedefinitionNotification
     "return the signal raised when a class or method is about to be installed
-     which redefines an existing method and the methods packages are not
+     which redefines an existing method and the method's packages are not
      equal. This helps when filing in alien code, to prevent existing
      methods to be overwritten or redefined by incompatible methods"
 
     ^ ClassDescription::PackageRedefinition
+
+    "Modified (comment): / 21-11-2017 / 12:59:42 / cg"
 !
 
 updateChangeFileQuerySignal
@@ -3162,9 +3166,9 @@
 printOutMethodProtocol:aMethod on:aPrintStream
     "{ Pragma: +optSpace }"
 
-    "given the source in aString, print the methods message specification
-     and any method comments - without source; used to generate documentation
-     pages"
+    "given the source in aString, print the method's message specification
+     and any method comments - without source. 
+     Used to generate documentation pages"
 
     |source comment|
 
@@ -3187,8 +3191,9 @@
       Float printOutMethodProtocol:(Float compiledMethodAt:#coerce:) on:Transcript
     "
 
-    "Modified: 9.11.1996 / 00:13:54 / cg"
-    "Created: 2.4.1997 / 01:11:00 / stefan"
+    "Modified: / 09-11-1996 / 00:13:54 / cg"
+    "Created: / 02-04-1997 / 01:11:00 / stefan"
+    "Modified (comment): / 21-11-2017 / 12:59:27 / cg"
 ! !
 
 !ClassDescription methodsFor:'queries'!