branch: externals/tempel
commit 700bfaffc88eca37cdde6ab7323d0aa6c9090456
Author: Daniel Mendler <[email protected]>
Commit: Daniel Mendler <[email protected]>
Rename variables
---
CHANGELOG.org | 8 ++++----
tempel.el | 10 +++++-----
2 files changed, 9 insertions(+), 9 deletions(-)
diff --git a/CHANGELOG.org b/CHANGELOG.org
index 2c08568b62..e825e03a50 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -6,10 +6,10 @@
- =tempel-done=, =tempel-abort=: Add =ALL= prefix argument to finish or abort
all
templates. If =ALL= is nil, treat only the template at point.
-- =tempel-done-on-region=, =tempel-done-on-boundary=: New options to customize
- quitting behavior. If =tempel-done-or-region= is non-nil, quit when entering
a
- region. If =tempel-done-on-boundary= is non-nil, quit when leaving the last
- field with =tempel-next= or =tempel-previous=.
+- =tempel-done-on-region=, =tempel-done-on-next=: New options to customize
quitting
+ behavior. If =tempel-done-or-region= is non-nil, quit when entering a region
+ field. If =tempel-done-on-next= is non-nil, quit when pressing =tempel-next=
from
+ inside the last field.
* Version 1.8 (2025-11-15)
diff --git a/tempel.el b/tempel.el
index 15c38b39ba..fe0fd3f761 100644
--- a/tempel.el
+++ b/tempel.el
@@ -93,8 +93,8 @@ must return a list of templates which apply to the buffer or
context."
"Automatically finish template when entering region field."
:type 'boolean)
-(defcustom tempel-done-on-boundary t
- "Automatically finish template at boundary."
+(defcustom tempel-done-on-next t
+ "Automatically finish template on `tempel-next' from last field."
:type 'boolean)
(defcustom tempel-auto-reload t
@@ -584,7 +584,7 @@ TEMPLATES must be a list in the form (modes plist .
templates)."
(when-let ((pos (tempel--beginning)))
(cond
((/= pos (point)) (goto-char pos))
- (tempel-done-on-boundary (tempel-done t)))))
+ (tempel-done-on-next (tempel-done t)))))
(defun tempel-end ()
"Move to end of the template."
@@ -593,7 +593,7 @@ TEMPLATES must be a list in the form (modes plist .
templates)."
(when-let ((pos (tempel--end)))
(cond
((/= pos (point)) (goto-char pos))
- (tempel-done-on-boundary (tempel-done t)))))
+ (tempel-done-on-next (tempel-done t)))))
(defun tempel--find-overlay (type)
"Find overlay of TYPE at point."
@@ -619,7 +619,7 @@ TEMPLATES must be a list in the form (modes plist .
templates)."
(cl-loop for i below (abs arg) do
(if-let ((next (tempel--find arg)))
(goto-char next)
- (when tempel-done-on-boundary
+ (when tempel-done-on-next
(tempel-done t))
(cl-return)))
;; Run the enter action of the field.
