aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDave Love2000-02-02 14:51:22 +0000
committerDave Love2000-02-02 14:51:22 +0000
commitbe64abcf66a59f892b077ef50becde97d57f32ea (patch)
tree303b76fd8f1404527dc4353c91165ce30f65b9d8
parentfaeeab84750abf88accf8c7e8cb05a67f6d41a89 (diff)
downloademacs-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.el4
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.