Andreas Raab uploaded a new version of Services-Base to project The Trunk:
http://source.squeak.org/trunk/Services-Base-ar.41.mcz

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

Name: Services-Base-ar.41
Author: ar
Time: 2 January 2010, 3:29:27 am
UUID: 81d816a6-80f2-ec45-aeb7-562da76a61ed
Ancestors: Services-Base-nice.40

Utilize menu hook in Browser.

=============== Diff against Services-Base-nice.40 ===============

Item was added:
+ ----- Method: Browser>>menuHook:named:shifted: (in category '*services-base') -----
+ menuHook: aMenu named: aSymbol shifted: aBool
+ 	aSymbol caseOf: {
+ 		[#classListMenu] -> [ServiceGui browser: self classMenu: aMenu].
+ 		[#codePaneMenu] -> [ServiceGui browser: self codePaneMenu: aMenu].
+ 		[#messageCategoryMenu] -> [ServiceGui browser: self messageCategoryMenu: aMenu.].
+ 		[#messageListMenu] -> [ServiceGui browser: self messageListMenu: aMenu.].
+ 		[#systemCategoryMenu] -> [ServiceGui browser: self classCategoryMenu: aMenu.].
+ 	} otherwise:[^false].
+ 	^ServiceGui onlyServices.
+ !