helpful

a fork of Wilfred's helpful
git clone https://git.trogloxene.org/helpful.git
Log | Files | Refs | README

commit dc4e356b55212f67c7022f3aec4f5986a23d5d5e
parent 60c1cd49f72e930b8796e5644bd222e8fc466740
Author: ksqsf <login@ksqsf.moe>
Date:   Fri,  4 Nov 2022 22:07:00 +0800

Remove use of (point) as a generalized variable

This use has been made obsolete since Emacs 29.
Diffstat:
Mhelpful.el | 2+-
1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/helpful.el b/helpful.el @@ -1760,7 +1760,7 @@ POSITION-HEADS takes the form ((123 (defun foo)) (456 (defun bar)))." (with-temp-buffer (declare-function cl--generic-describe "cl-generic" (function)) (cl--generic-describe func) - (setf (point) (point-min)) + (goto-char (point-min)) (when (re-search-forward "^Implementations:$" nil t) (setq content (buffer-substring (point) (point-max))))) (when content