document el-search--do-subsexps

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index e7786c1585341c8c7d4b3b411c5e9c1d4d10a9f4..8eb328e49c39ae5699dc28216a88428405e03d03 100644 (file)
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -351,7 +351,11 @@ return nil (no error)."
     match-beg))
 
 (defun el-search--do-subsexps (pos do-fun &optional ret-fun bound)
-  ;; bound -> nil means till end of buffer
+  ;; In current buffer, for any expression start between POS and BOUND
+  ;; or (point-max), in oder, call two argument function DO-FUN with
+  ;; the current sexp string and the ending position of the current
+  ;; sexp.  When done, with RET-FUN given, call it with no args and
+  ;; return the result; else, return nil.
   (save-excursion
     (goto-char pos)
     (condition-case nil