summaryrefslogtreecommitdiff
path: root/elisp/geiser-base.el
diff options
context:
space:
mode:
Diffstat (limited to 'elisp/geiser-base.el')
-rw-r--r--elisp/geiser-base.el4
1 files changed, 4 insertions, 0 deletions
diff --git a/elisp/geiser-base.el b/elisp/geiser-base.el
index 41fb6fc..65ab061 100644
--- a/elisp/geiser-base.el
+++ b/elisp/geiser-base.el
@@ -70,6 +70,10 @@
(dolist (e lst (nreverse result))
(unless (member e result) (push e result)))))
+(defsubst geiser--symbol-at-point ()
+ (let ((thing (thing-at-point 'symbol)))
+ (and thing (make-symbol thing))))
+
(provide 'geiser-base)
;;; geiser-base.el ends here