Update search.lisp