[Pkg] The Trunk: Protocols-cmm.50.mcz

commits at source.squeak.org commits at source.squeak.org
Fri Sep 11 22:06:24 UTC 2015

Chris Muller uploaded a new version of Protocols to project The Trunk:

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

Name: Protocols-cmm.50
Author: cmm
Time: 11 September 2015, 5:06:16.322 pm
UUID: 87f9e0ae-06a7-45f7-8887-20b1751cd251
Ancestors: Protocols-ul.49

Fix a preference access.

=============== Diff against Protocols-ul.49 ===============

Item was changed:
  ----- Method: Vocabulary class>>typeChoices (in category 'type vocabularies') -----
  	"Answer a list of all user-choosable data types"
  	| vocabulariesForType |
  	vocabulariesForType := self allStandardVocabularies select: [:e | e representsAType].
+ 	(Preferences valueOfFlag: #allowEtoyUserCustomEvents) ifFalse: [vocabulariesForType removeKey: #CustomEvents ifAbsent: []].
- 	Preferences allowEtoyUserCustomEvents ifFalse: [vocabulariesForType removeKey: #CustomEvents ifAbsent: []].
  	^vocabulariesForType keys sort!

More information about the Packages mailing list