PRComponent allInstances do: [ :comp |
(comp componentClass includesBehavior: PRViewsWidget) ifTrue: [
comp settings at: PRViewsWidget descriptionViewClasses ifPresent: [ :classes |
comp settings
at: PRViewsWidget descriptionViewClasses
put: (classes reject: [ :each | each isObsolete ]) ] ] ]