[squeak-dev] The Trunk: HelpSystem-Core-mt.74.mcz

commits at source.squeak.org commits at source.squeak.org
Sun May 10 11:54:41 UTC 2015


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

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

Name: HelpSystem-Core-mt.74
Author: mt
Time: 10 May 2015, 1:54:34.265 pm
UUID: 6c85fc29-286f-144f-987a-c450aa4201dd
Ancestors: HelpSystem-Core-mt.73

Added support for ignoring class-based help topics.

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

Item was changed:
  ----- Method: ClassBasedHelpTopic>>updateSubtopics (in category 'updating') -----
  updateSubtopics
  
  	| pages |
  	pages := (self helpClass pages collect: [:pageSelectorOrClassName |
  		(Smalltalk hasClassNamed: pageSelectorOrClassName asString)
  			ifTrue: [Smalltalk classNamed: pageSelectorOrClassName asString]
  			ifFalse: [pageSelectorOrClassName]]) asOrderedCollection.
  
+ 	self helpClass subclasses
+ 		select: [:cls | cls ignore not]
+ 		thenDo: [:cls | pages addIfNotPresent: cls].	
- 	self helpClass subclasses do: [:cls |
- 		pages addIfNotPresent: cls].	
  
  	^ subtopics := pages withIndexCollect: [:pageSelectorOrClass :priority |
  		pageSelectorOrClass isBehavior
  			ifFalse: [(self helpClass perform: pageSelectorOrClass) priority: priority - pages size; yourself]
  			ifTrue: [pageSelectorOrClass asHelpTopic]]!

Item was added:
+ ----- Method: CustomHelp class>>ignore (in category 'accessing') -----
+ ignore
+ 
+ 	^ false!



More information about the Squeak-dev mailing list