| nav suspects |
nav := SystemNavigation new.
suspects := nav
allMethodsWithSourceString:'SGsl'
matchCase:true.
suspects := suspects reject:[ :each |
each category = 'public-old'
or:[ each classSymbol beginsWith:'SGsl' ] ].
nav
browseMessageList:suspects
name: 'Methods referencing old GSL structs'
autoSelect:'SGsl'.
It might be a useful trick for some of you?? HTH.
Bill