Clean up section headers for consistency

Co-authored-by: Kinneyzhang <38454496+Kinneyzhang@users.noreply.github.com>
This commit is contained in:
copilot-swe-agent[bot] 2025-12-28 10:09:55 +00:00
parent 868ba038d9
commit 121662dee8

17
tp.el
View File

@ -3036,11 +3036,10 @@ NAME can be nil for an unnamed layer."
start end obj)
nil))
;;; Layer query functions
;;; --- Layer Query Functions ---
(defun tp-layer-list (start end &optional object)
"Return list of all layer names in region from START to END.
OBJECT defaults to current buffer."
"Return list of all layer names in region from START to END."
(let ((layers nil))
(tp-intervals-map
(lambda (_i-start _i-end top belows)
@ -3075,18 +3074,10 @@ OBJECT defaults to current buffer."
(when-let ((intervals (tp-intervals start end object)))
(plist-get (nth 2 (car intervals)) 'tp-name)))
;;; Layer property manipulation functions
;;; --- Layer Property Manipulation Functions ---
(defun tp-add-to-layers (idx-or-layer-name-list start-or-string &optional end-or-plist plist-or-object &rest rest)
"Add/merge properties to specified layers.
This function supports two calling conventions:
1. Buffer/string region:
(tp-add-to-layers IDX-OR-LAYER-NAME-LIST START END PLIST OBJECT)
2. Entire string:
(tp-add-to-layers IDX-OR-LAYER-NAME-LIST STRING PROP VAL ...)
"Add/merge properties to specified layers."
IDX-OR-LAYER-NAME-LIST is a list of layer indices (integers) or
layer names (symbols) specifying which layers to add properties to.