llm-tools.el

commit b052ec7ded67ba5f187b00291aa58cc38856c826
parent f0ecdc6a955b7d0f9020aba3a8e2c46c7e22f9d5
Author: Vineet Kumar <git@vineetk.net>
Date:   Sun, 24 May 2026 20:26:51 -0400

fix docstrings

Diffstat:
M
llm-tools-hl.el
 | 
8
++++++--

1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/llm-tools-hl.el b/llm-tools-hl.el
@@ -90,7 +90,8 @@ If INCLUDE-CONTENT is non-nil, append `|LINE' after each hash."
   (llm-tools--hl-format-lines (llm-tools--hl-file-lines file beg end) beg t))
 
 (defun llm-tools--hl-file-read-hashes (file)
-  "TODO rewrite docstring to be less redundant. Return FILE contents in hashline format without content as a list of hashline-formatted hashes."
+  "Return FILE contents as a list of hashline strings without line content.
+Each element is a line number and two-character hash, like `1vx'."
   (string-lines (llm-tools--hl-format-lines (llm-tools--hl-file-lines file))))
 
 (defun llm-tools--hl-file-line-hash (file n)
@@ -149,7 +150,10 @@ the operations in that file's sections.  Each anchor is a string like
 	     sections))))
 
 (defun llm-tools--hl-verify (patch)
-  "TODO rewrite docstring to be lses verbose? Verifies the anchors exist in PATCH."
+  "Verify that all anchors in PATCH match the current file contents.
+Returns a list of booleans, one per file, indicating whether every
+anchor in that file's patch sections still matches the corresponding
+line in the on-disk file."
   (let ((patch-anchors (llm-tools--hl-get-anchors patch)))
     (mapcar (lambda (section)
 	      (let* ((file (car section))