--- a/HTMLDocGenerator.st	Fri Feb 10 11:22:33 2017 +0100
+++ b/HTMLDocGenerator.st	Fri Feb 10 11:43:20 2017 +0100
@@ -2599,7 +2599,7 @@
 
     selectors := IdentitySet new.
     Smalltalk allClassesAndMetaclassesDo:[:cls |
-        cls methodDictionary keysDo:[:sel |
+        cls selectorsDo:[:sel |
             (pattern match:sel) ifTrue:[
                 selectors add:sel.
             ]
@@ -2615,9 +2615,9 @@
      self htmlSelectorListMatching:'*do*'
     "
 
-    "Created: / 22.4.1996 / 20:03:31 / cg"
-    "Modified: / 5.6.1996 / 12:29:27 / stefan"
-    "Modified: / 30.10.1997 / 13:25:50 / cg"
+    "Created: / 22-04-1996 / 20:03:31 / cg"
+    "Modified: / 05-06-1996 / 12:29:27 / stefan"
+    "Modified: / 10-02-2017 / 10:32:37 / cg"
 !
 
 htmlSelectorListPrefix:prefix
@@ -2628,7 +2628,7 @@
 
     selectors := IdentitySet new.
     Smalltalk allClassesAndMetaclassesDo:[:cls |
-        cls methodDictionary keysDo:[:sel |
+        cls selectorsDo:[:sel |
             (sel startsWith:prefix) ifTrue:[
                 selectors add:sel.
             ]
@@ -2644,9 +2644,9 @@
      self htmlSelectorListPrefix:'a'
     "
 
-    "Created: / 22.4.1996 / 20:03:31 / cg"
-    "Modified: / 5.6.1996 / 12:31:13 / stefan"
-    "Modified: / 30.10.1997 / 13:26:15 / cg"
+    "Created: / 22-04-1996 / 20:03:31 / cg"
+    "Modified: / 05-06-1996 / 12:31:13 / stefan"
+    "Modified: / 10-02-2017 / 10:32:31 / cg"
 !
 
 htmlSelectors:selectors title:title