diff options
| author | Dave Love | 2000-02-02 14:51:22 +0000 |
|---|---|---|
| committer | Dave Love | 2000-02-02 14:51:22 +0000 |
| commit | be64abcf66a59f892b077ef50becde97d57f32ea (patch) | |
| tree | 303b76fd8f1404527dc4353c91165ce30f65b9d8 | |
| parent | faeeab84750abf88accf8c7e8cb05a67f6d41a89 (diff) | |
| download | emacs-be64abcf66a59f892b077ef50becde97d57f32ea.tar.gz emacs-be64abcf66a59f892b077ef50becde97d57f32ea.zip | |
(sexp-at-point, symbol-at-point)
(number-at-point, list-at-point): Add autoload cookie.
| -rw-r--r-- | lisp/thingatpt.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/thingatpt.el b/lisp/thingatpt.el index 6da92490653..214f6dcfde1 100644 --- a/lisp/thingatpt.el +++ b/lisp/thingatpt.el | |||
| @@ -384,9 +384,13 @@ Signal an error if the entire string was not used." | |||
| 384 | (error nil)))) | 384 | (error nil)))) |
| 385 | (if (or (not pred) (funcall pred sexp)) sexp))) | 385 | (if (or (not pred) (funcall pred sexp)) sexp))) |
| 386 | 386 | ||
| 387 | ;;;###autoload | ||
| 387 | (defun sexp-at-point () (form-at-point 'sexp)) | 388 | (defun sexp-at-point () (form-at-point 'sexp)) |
| 389 | ;;;###autoload | ||
| 388 | (defun symbol-at-point () (form-at-point 'sexp 'symbolp)) | 390 | (defun symbol-at-point () (form-at-point 'sexp 'symbolp)) |
| 391 | ;;;###autoload | ||
| 389 | (defun number-at-point () (form-at-point 'sexp 'numberp)) | 392 | (defun number-at-point () (form-at-point 'sexp 'numberp)) |
| 393 | ;;;###autoload | ||
| 390 | (defun list-at-point () (form-at-point 'list 'listp)) | 394 | (defun list-at-point () (form-at-point 'list 'listp)) |
| 391 | 395 | ||
| 392 | ;; thingatpt.el ends here. | 396 | ;; thingatpt.el ends here. |