anEvent itemKind = SystemChangeNotifier classKind ifTrue: [
		...
		anEvent isModified 
			ifTrue: [anEvent anyChanges ifTrue: [self changeClass: anEvent item from: anEvent oldItem]].
		anEven

So...I don't understand the #anyChanges. We received an event saying that a class was modified, but it may not have any changes? if true, why was the event sent?
Ok...let's say that there could be several reasons that a class was modified but only some of them make sense to change set. I can imagine people wanted to avoid writing stuff to .changes that didn't actullay represente a change?

If this is the case, then #anyChanges looks like a bad name for me.
Now, do we still need this mesage? can there be ClassModified events without changes?