393 |
(make-local-variable 'revert-buffer-function) |
(make-local-variable 'revert-buffer-function) |
394 |
(setq revert-buffer-function 'locate-update) |
(setq revert-buffer-function 'locate-update) |
395 |
(set (make-local-variable 'page-delimiter) "\n\n") |
(set (make-local-variable 'page-delimiter) "\n\n") |
396 |
(run-hooks 'locate-mode-hook)) |
(run-mode-hooks 'locate-mode-hook)) |
397 |
|
|
398 |
(defun locate-do-setup (search-string) |
(defun locate-do-setup (search-string) |
399 |
(goto-char (point-min)) |
(goto-char (point-min)) |