aboutsummaryrefslogtreecommitdiff
path: root/compat-29.el
diff options
context:
space:
mode:
authorDaniel Mendler <mail@daniel-mendler.de>2023-01-20 19:41:36 +0100
committerDaniel Mendler <mail@daniel-mendler.de>2023-01-20 19:41:36 +0100
commit688e2d983c8ca41c1b5a5241d22df31a57575a0a (patch)
tree9cd3cc2550001b18d92925533a839eeb7b5f678c /compat-29.el
parentadcbf00d7740e44ea997c06ce89473b5824674d8 (diff)
Add missing links to tests
Diffstat (limited to 'compat-29.el')
-rw-r--r--compat-29.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/compat-29.el b/compat-29.el
index 60f5b2e..efba433 100644
--- a/compat-29.el
+++ b/compat-29.el
@@ -171,7 +171,7 @@ This function does not move point. Also see `line-end-position'."
;;;; Defined in subr.el
-(compat-defun buffer-local-restore-state (states)
+(compat-defun buffer-local-restore-state (states) ;; <compat-tests:buffer-local-set-state>
"Restore values of buffer-local variables recorded in STATES.
STATES should be an object returned by `buffer-local-set-state'."
(dolist (state states)
@@ -179,7 +179,7 @@ STATES should be an object returned by `buffer-local-set-state'."
(set (car state) (caddr state))
(kill-local-variable (car state)))))
-(compat-defun buffer-local-set-state--get (pairs)
+(compat-defun buffer-local-set-state--get (pairs) ;; <compat-tests:buffer-local-set-state>
"Internal helper function."
(let ((states nil))
(while pairs
@@ -192,7 +192,7 @@ STATES should be an object returned by `buffer-local-set-state'."
(setq pairs (cddr pairs)))
(nreverse states)))
-(compat-defmacro buffer-local-set-state (&rest pairs)
+(compat-defmacro buffer-local-set-state (&rest pairs) ;; <compat-tests:buffer-local-set-state>
"Like `setq-local', but allow restoring the previous state of locals later.
This macro returns an object that can be passed to `buffer-local-restore-state'
in order to restore the state of the local variables set via this macro.
@@ -222,7 +222,7 @@ in order to restore the state of the local variables set via this macro.
"Delete the current line."
(delete-region (pos-bol) (pos-bol 2)))
-(compat-defmacro with-narrowing (start end &rest rest)
+(compat-defmacro with-narrowing (start end &rest rest) ;; <compat-tests:with-narrowing>
"Execute BODY with restrictions set to START and END.
The current restrictions, if any, are restored upon return.