diff --git a/tools/clog-builder-dir-tree.lisp b/tools/clog-builder-dir-tree.lisp
index 088de89..e5b8776 100644
--- a/tools/clog-builder-dir-tree.lisp
+++ b/tools/clog-builder-dir-tree.lisp
@@ -148,7 +148,6 @@
                                                  (opt   (create-div menu :content "Open new tab" :class *builder-menu-context-item-class*))
                                                  (ope   (create-div menu :content "Open emacs" :class *builder-menu-context-item-class*))
                                                  (opo   (create-div menu :content "Open os default" :class *builder-menu-context-item-class*))
-                                                 (grp   (create-div menu :content "Search directory" :class *builder-menu-context-item-class*))
                                                  (ren   (create-div menu :content "Rename" :class *builder-menu-context-item-class*))
                                                  (del   (create-div menu :content "Delete" :class *builder-menu-context-item-class*)))
                                             (declare (ignore title op))
@@ -161,9 +160,6 @@
                                                                                obj))
                                                                     :cancel-event t))
                                                     *file-extensions*)
-                                            (set-on-click grp (lambda (i)
-                                                                (declare (ignore i))
-                                                                (on-file-search obj :dir item)))
                                             (set-on-click menu (lambda (i)
                                                                  (declare (ignore i))
                                                                  (destroy menu)))