From 2ca486761a68e5e60321d4d07a99d0bfaee3bc70 Mon Sep 17 00:00:00 2001 From: sarcom-sar Date: Wed, 30 Jul 2025 21:24:52 +0200 Subject: [PATCH] setf on point is obsolete MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit As of 29.1 ‘point’ is an obsolete generalized variable. --- share/emacs.txt | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/share/emacs.txt b/share/emacs.txt index a2808317..3868bb2e 100644 --- a/share/emacs.txt +++ b/share/emacs.txt @@ -59,7 +59,7 @@ text.") (buffer (url-retrieve-synchronously (format cheat-sh-url (url-hexify-string thing)) t t))) (when buffer (with-current-buffer buffer - (setf (point) (point-min)) + (goto-char (point-min)) (when (search-forward-regexp "^$" nil t) (buffer-substring (point) (point-max))))))) @@ -95,7 +95,7 @@ based of the sheets that are available on cheat.sh." "Decorate BUFFER, finding REGEXP and setting face to FACE." (with-current-buffer buffer (save-excursion - (setf (point) (point-min)) + (goto-char (point-min)) (while (search-forward-regexp regexp nil t) (replace-match (propertize (match-string 1) 'font-lock-face face) nil t)))))