I wanted add this to the bugs for 3.10 but I could not do it since I  
could not find the project


	| set |
	set := Set new.
	Smalltalk allClasses do: [:each |
			set addAll: each organization categories.].
	^ set select: [:each | each first = $*].
	
shows that we have some dirty method categories.

Stef