[etoys-dev] Etoys: Sugar-bf.8.mcz

[commits at source.squeak.org]

Bert Freudenberg uploaded a new version of Sugar to project Etoys:
http://source.squeak.org/etoys/Sugar-bf.8.mcz

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

Name: Sugar-bf.8
Author: bf
Time: 29 August 2010, 6:05:49 pm
UUID: 635b1c56-6531-4098-a130-144e907a8cc3
Ancestors: Sugar-bf.7

Inform user about missing QuickGuides

=============== Diff against Sugar-bf.7 ===============

Item was changed:
  ----- Method: SugarNavigatorBar>>toggleHelp (in category 'help flap') -----
  toggleHelp
  	"Open the help-cards flap, or close it if open."
  
  	| ref f guide |
  	f _ Flaps globalFlapTab: 'Help' translated.
  	f ifNotNil:
  		[
  		f isInWorld
  			ifTrue:
  				[ref _ f referent.
  				ref ifNotNil: [guide _ ref findDeeplyA: QuickGuideMorph].
  				guide ifNotNil: [guide unloadPages].
  				Flaps removeFlapTab: f keepInList: false]
  			ifFalse:
  				[f openInWorld.
  				f showFlap.
  				ref _ f referent.
  				ref ifNotNil: [
  					guide _ ref findDeeplyA: QuickGuideMorph].
  					guide ifNotNil: [Cursor wait showWhile: [guide initializeIndexPage]]]]
  		ifNil:
+ 			[QuickGuideMorph guidePath
+ 				ifNil: [^self inform: 'There are no QuickGuides installed' translated].
+ 			Cursor wait showWhile: [self buildAndOpenHelpFlap]]!
- 			[Cursor wait showWhile: [self buildAndOpenHelpFlap]]!