1 "

     3 "

     2  Copyright (C) Original Authors (Kaehler, Scott Wallace and Dan Ingalls)

     4  Copyright (C) Original Authors (Kaehler, Scott Wallace and Dan Ingalls)

     3  Copyright (C) 2001 eXept Software AG

     5  Copyright (C) 2001 eXept Software AG

     4 

     6 

     5  Permission is hereby granted, free of charge, to any 

     7  Permission is hereby granted, free of charge, to any 

  1217     classList := methods asOrderedCollection 

  1219     classList := methods asOrderedCollection 

  1218             collect:[:m | m mclass name , ' ' , m selector ].

  1220             collect:[:m | m mclass name , ' ' , m selector ].

  1219     classList := (self markMatchingClasses:(resultSelectors at:aNumber)

  1221     classList := (self markMatchingClasses:(resultSelectors at:aNumber)

  1220             classesWithSelector:classList).

  1222             classesWithSelector:classList).

  1221     self classOfResultHolder value:classList.

  1223     self classOfResultHolder value:classList.

  1223         self selectedClassOfResultHolder value:(classList first).

  1225         self selectedClassOfResultHolder value:(classList first).

  1224         self selectedClassOfResultHolderChanged.

  1226         self selectedClassOfResultHolderChanged.

  1225     ] ifFalse:[

  1227     ] ifFalse:[

  1226         self selectedClassOfResultHolder value:nil.

  1228         self selectedClassOfResultHolder value:nil.

  1227     ].

  1229     ].

  1228 

  1230 

  1229     "Modified (comment): / 24-06-2012 / 18:41:45 / cg"

  1231     "Modified (comment): / 24-06-2012 / 18:41:45 / cg"

  1230 !

  1233 !

  1231 

  1234 

  1232 updateListAfterPatternSearch:resultList

  1235 updateListAfterPatternSearch:resultList

  1233     |searchPattern idx|

  1236     |searchPattern idx|

  1234     

  1237