--- a/HTMLDocGenerator.st	Fri Jun 03 11:51:28 2016 +0200
+++ b/HTMLDocGenerator.st	Sat Jun 04 04:53:13 2016 +0200
@@ -1672,6 +1672,9 @@
             ]
         ]
     ].
+    aMethod isExtension ifTrue:[
+        methodSpecLine := methodSpecLine,(' <br>( <i>an extension from the %1 package</i> )' bindWith:aMethod package).
+    ].
 
     aStream nextPutLine:'<DT>'.