Searcher in pure elisp