Mercurial > emacs
comparison lisp/locate.el @ 90829:92c344270c8a
Merge from emacs--devo--0
Patches applied:
* emacs--devo--0 (patch 711-712)
- Update from CVS
Revision: emacs@sv.gnu.org/emacs--unicode--0--patch-199
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Thu, 26 Apr 2007 04:38:27 +0000 |
| parents | e6fdae9180d4 40acbd9992e2 |
| children | 70bf32a0f523 |
comparison
equal
deleted
inserted
replaced
| 90828:cc0ad0e60cfc | 90829:92c344270c8a |
|---|---|
| 667 (setq file (encode-coding-string file buffer-file-coding-system))) | 667 (setq file (encode-coding-string file buffer-file-coding-system))) |
| 668 file)) | 668 file)) |
| 669 | 669 |
| 670 ;; Only for GNU locate | 670 ;; Only for GNU locate |
| 671 (defun locate-in-alternate-database (search-string database) | 671 (defun locate-in-alternate-database (search-string database) |
| 672 "Run the GNU locate command, using an alternate database." | 672 "Run the GNU locate command, using an alternate database. |
| 673 | |
| 674 This command only works if you use GNU locate. It does not work | |
| 675 properly if `locate-prompt-for-command' is set to t. In that | |
| 676 case, you can just run the regular `locate' command and specify | |
| 677 the database on the command line." | |
| 673 (interactive | 678 (interactive |
| 674 (list | 679 (list |
| 675 (progn | 680 (progn |
| 676 ;; (require 'locate) | 681 ;; (require 'locate) |
| 677 (read-from-minibuffer "Locate: " nil nil | 682 (read-from-minibuffer "Locate: " nil nil |