branch: externals/capf-autosuggest
commit e3934409e68c008dfe0b1b877ab5ee85a3eb7643
Author: jakanakaevangeli <[email protected]>
Commit: jakanakaevangeli <[email protected]>

    Don't make doc strings wider than 80 characters
---
 capf-autosuggest.el | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

diff --git a/capf-autosuggest.el b/capf-autosuggest.el
index a065f33..426e621 100644
--- a/capf-autosuggest.el
+++ b/capf-autosuggest.el
@@ -254,11 +254,19 @@ into an auto-suggested overlay.  COMMAND must not modify 
buffer.
 NAME must not be called if variable
 `capf-autosuggest-active-mode' is inactive.  NAME is suitable for
 binding in `capf-autosuggest-active-mode-map'."
-  `(defun ,name ()
-     ,(format "`%s', possibly moving point into an auto-suggested overlay."
-              command)
-     (interactive)
-     (capf-autosuggest-call-partial-accept-cmd #',command)))
+  (let ((doc (format
+              "`%s', possibly moving point into an auto-suggested overlay."
+              command)))
+    (unless (< (length doc) 80)
+      (setq doc (format "\
+Execute command, possibly moving point into an auto-suggested overlay.
+`%s'
+and make it possible for this command to enter an auo-suggested overlay."
+                        command)))
+    `(defun ,name ()
+       ,doc
+       (interactive)
+       (capf-autosuggest-call-partial-accept-cmd #',command))))
 
 (defun capf-autosuggest-call-partial-accept-cmd (command)
   "Call COMMAND interactively, stepping into auto-suggested overlay.

Reply via email to