--- a/SmallSense__ClassSearchDialog.st	Fri Jun 20 13:56:46 2014 +0100
+++ b/SmallSense__ClassSearchDialog.st	Fri Jun 20 14:25:09 2014 +0100
@@ -183,11 +183,12 @@
             objects add: cls.
         ].
     ].
-    recent := recent collect:[ :cls | objects includes: cls ].
+    recent := recent select:[ :cls | objects includes: cls ].
     matchingObjects := recent.
     self updateMatchingObjects: recent.
 
     "Created: / 10-05-2014 / 11:49:34 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 20-06-2014 / 14:15:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
 !ClassSearchDialog methodsFor:'hooks'!