[squeak-dev] The Trunk: HelpSystem-Core-tbn.51.mcz

commits at source.squeak.org commits at source.squeak.org
Mon Sep 20 07:58:52 UTC 2010


Torsten Bergmann uploaded a new version of HelpSystem-Core to project The Trunk:
http://source.squeak.org/trunk/HelpSystem-Core-tbn.51.mcz

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

Name: HelpSystem-Core-tbn.51
Author: tbn
Time: 20 September 2010, 9:58:45.404 am
UUID: 5a88aca2-81a0-6544-a3b2-02fa6cca8085
Ancestors: HelpSystem-Core-ar.50

lazy convert to topic to allow refreshing from original target (see pharo issue 2978)

=============== Diff against HelpSystem-Core-ar.50 ===============

Item was changed:
  ----- Method: HelpBrowser classSide>>openOn: (in category 'instance creation') -----
  openOn: aHelpTopic
+         "Open the receiver on the given help topic or any other object that can be transformed into
+          a help topic by sending #asHelpTopic."
+         
+         ^(self defaultHelpBrowser new)
+                 rootTopic: aHelpTopic;
+                 open;
+                 yourself!
- 	"Open the receiver on the given help topic or any other object that can be transformed into
- 	 a help topic by sending #asHelpTopic."
- 	
- 	^(self defaultHelpBrowser new)
- 		rootTopic: aHelpTopic asHelpTopic;
- 		open;
- 		yourself!

Item was changed:
  ----- Method: HelpBrowser>>onItemClicked: (in category 'events') -----
  onItemClicked: anItem
+ 	anItem isNil ifTrue: [^contentMorph setText: rootTopic asHelpTopic contents].
- 	anItem isNil ifTrue: [^contentMorph setText: rootTopic contents].
  	contentMorph setText: anItem contents!

Item was changed:
  ----- Method: HelpBrowser>>refresh (in category 'actions') -----
  refresh
  
+         |helpTopic items|
+         helpTopic := rootTopic asHelpTopic.
+         window setLabel: helpTopic title.
+         items := helpTopic subtopics collect: [:each | HelpTopicListItemWrapper with: each ].
+         treeMorph list: items.
+         contentMorph setText: helpTopic contents
- 	|items|
- 	window setLabel: rootTopic title.
- 	items := rootTopic subtopics collect: [:each | HelpTopicListItemWrapper with: each ].
- 	treeMorph list: items.
- 	contentMorph setText: rootTopic contents
  !




More information about the Squeak-dev mailing list