210 |
(setq input default)) |
(setq input default)) |
211 |
input)))) |
input)))) |
212 |
(if (equal search-string "") |
(if (equal search-string "") |
213 |
(error "Please specify a filename to search for.")) |
(error "Please specify a filename to search for")) |
214 |
(let* ((locate-cmd-list (funcall locate-make-command-line search-string)) |
(let* ((locate-cmd-list (funcall locate-make-command-line search-string)) |
215 |
(locate-cmd (car locate-cmd-list)) |
(locate-cmd (car locate-cmd-list)) |
216 |
(locate-cmd-args (cdr locate-cmd-list)) |
(locate-cmd-args (cdr locate-cmd-list)) |