diff --git a/src/edt/edt/edtMainService.cc b/src/edt/edt/edtMainService.cc
index d582e9af0..6cd58614e 100644
--- a/src/edt/edt/edtMainService.cc
+++ b/src/edt/edt/edtMainService.cc
@@ -2364,7 +2364,12 @@ MainService::cm_tap ()
     return;
   }
 
-  lay::ShapeFinder finder (true /*point mode*/, false /*all hierarchy levels*/, db::ShapeIterator::All, 0, true /*capture all shapes*/);
+  lay::ShapeFinder finder (true,    //  point mode
+                           false,   //  all hierarchy levels
+                           db::ShapeIterator::flags_type (db::ShapeIterator::All - db::ShapeIterator::Texts),  //  do not consider texts - their bounding box may be too large
+                           0,       //  no excludes
+                           true     //  capture all shapes
+                          );
 
   //  capture all objects in point mode (default: capture one only)
   finder.set_catch_all (true);