diff options
| author | Karl Heuer | 1998-09-21 16:35:21 +0000 |
|---|---|---|
| committer | Karl Heuer | 1998-09-21 16:35:21 +0000 |
| commit | 917eabae09e6e79a76fe7e7aca58643e5cb05e62 (patch) | |
| tree | 0341b138e59fde2d3b11d6608403a3f4f0f4ee8f | |
| parent | c2509060c71edf5ba17d10e2360b03b3b5ecb325 (diff) | |
| download | emacs-917eabae09e6e79a76fe7e7aca58643e5cb05e62.tar.gz emacs-917eabae09e6e79a76fe7e7aca58643e5cb05e62.zip | |
(find-function-search-for-symbol): Fix error messages.
| -rw-r--r-- | lisp/emacs-lisp/find-func.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/find-func.el b/lisp/emacs-lisp/find-func.el index 4adf67346a7..6b295cfcc91 100644 --- a/lisp/emacs-lisp/find-func.el +++ b/lisp/emacs-lisp/find-func.el | |||
| @@ -128,7 +128,7 @@ If VARIABLE-P is nil, `find-function-regexp' is used, otherwise | |||
| 128 | (locate-library (concat library ".gz") | 128 | (locate-library (concat library ".gz") |
| 129 | t path))))))) | 129 | t path))))))) |
| 130 | (if (not filename) | 130 | (if (not filename) |
| 131 | (error "The library \"%s\" is not in the path." library)) | 131 | (error "The library `%s' is not in the path" library)) |
| 132 | (with-current-buffer (find-file-noselect filename) | 132 | (with-current-buffer (find-file-noselect filename) |
| 133 | (save-match-data | 133 | (save-match-data |
| 134 | (let ((regexp (format (if variable-p | 134 | (let ((regexp (format (if variable-p |
| @@ -144,7 +144,7 @@ If VARIABLE-P is nil, `find-function-regexp' is used, otherwise | |||
| 144 | (progn | 144 | (progn |
| 145 | (beginning-of-line) | 145 | (beginning-of-line) |
| 146 | (cons (current-buffer) (point))) | 146 | (cons (current-buffer) (point))) |
| 147 | (error "Cannot find definition of `%s' in library \"%s\"" | 147 | (error "Cannot find definition of `%s' in library `%s'" |
| 148 | symbol library))) | 148 | symbol library))) |
| 149 | (set-syntax-table syn-table))))))) | 149 | (set-syntax-table syn-table))))))) |
| 150 | 150 | ||