branch: master
commit 1f278f89eb4e089d5997b5f9f58cac3feac93f59
Author: Michael Heerdegen <[email protected]>
Commit: Michael Heerdegen <[email protected]>
Also count pattern types starting with "_" as internal
---
packages/el-search/el-search.el | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index 085976d..160e243 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -663,7 +663,7 @@ a string or comment."
(insert (or (cdr ud) main))
(mapc
(pcase-lambda (`(,symbol . ,fun))
- (unless (string-match-p "\\`-\\|--" (symbol-name symbol)) ;let's
consider these "internal"
+ (unless (string-match-p "\\`[-_]\\|--" (symbol-name symbol)) ;let's
consider these "internal"
(when-let ((doc (documentation fun)))
(insert "\n\n\n-- ")
(setq doc (help-fns--signature symbol doc fun fun nil))
