Marcel Taeumel uploaded a new version of HelpSystem-Core to project The Trunk:
http://source.squeak.org/trunk/HelpSystem-Core-ct.125.mcz

==================== Summary ====================

Name: HelpSystem-Core-ct.125
Author: ct
Time: 14 October 2019, 12:33:57.997932 am
UUID: bdc17b48-7f21-844e-ad05-f3ba9876fd3f
Ancestors: HelpSystem-Core-mt.116

Adds CustomHelp>>#defaultPageKey to show the contents of a specified subtopic if a ClassBasedHelpTopic is selected

=============== Diff against HelpSystem-Core-mt.116 ===============

Item was changed:
  ----- Method: ClassBasedHelpTopic>>contents (in category 'accessing') -----
  contents
  	"A book has no contents. Only its pages do."
  	
+ 	^ self defaultSubtopic ifNil: [''] ifNotNil: #contents!
- 	^ ''!

Item was added:
+ ----- Method: ClassBasedHelpTopic>>defaultSubtopic (in category 'accessing') -----
+ defaultSubtopic
+ 
+ 	^ self helpClass defaultPageKey
+ 		ifNotNil: [:key |
+ 			self subtopics
+ 				detect: [:topic | topic key = key]
+ 				ifNone: [nil]]
+ 		ifNil: [nil]!

Item was added:
+ ----- Method: ClassBasedHelpTopic>>key (in category 'accessing') -----
+ key
+ 
+ 	^ self helpClass!

Item was added:
+ ----- Method: CustomHelp class>>defaultPageKey (in category 'accessing') -----
+ defaultPageKey
+ 	"Key of the page to show if no subtopic is selected, or nil"
+ 	^ nil!