aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-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.