branch: externals/code-cells
commit 9da2ff44d1324b7c827b5d475391ba0a16c34239
Author: Augusto Stoffel <arstof...@gmail.com>
Commit: Augusto Stoffel <arstof...@gmail.com>
Adapt to new behavior of forward-page on Emacs 29
Closes #13.
---
code-cells.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/code-cells.el b/code-cells.el
index 69a8986426..1444e00ed6 100644
--- a/code-cells.el
+++ b/code-cells.el
@@ -105,6 +105,8 @@ With ARG, repeat this that many times. If ARG is negative,
move
backward."
(interactive "p")
(let ((page-delimiter (code-cells-boundary-regexp)))
+ (when (and (< 0 arg) (looking-at page-delimiter))
+ (forward-char))
(forward-page arg)
(unless (eobp)
(move-beginning-of-line 1))))
