emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/capf-autosuggest c6a38f3 17/63: Sentence end double spa


From: ELPA Syncer
Subject: [elpa] externals/capf-autosuggest c6a38f3 17/63: Sentence end double space
Date: Wed, 27 Oct 2021 14:57:56 -0400 (EDT)

branch: externals/capf-autosuggest
commit c6a38f37c523c33425768065e4d46c031aa13f93
Author: jakanakaevangeli <jakanakaevangeli@chiru.no>
Commit: jakanakaevangeli <jakanakaevangeli@chiru.no>

    Sentence end double space
---
 capf-autosuggest.el | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

diff --git a/capf-autosuggest.el b/capf-autosuggest.el
index 09fc452..33e9ee0 100644
--- a/capf-autosuggest.el
+++ b/capf-autosuggest.el
@@ -40,9 +40,9 @@ variable.")
 
 (defvar capf-autosuggest-all-completions-only-one nil
   "Non-nil if only the first result of `all-completions' is of interest.
-capf-autosuggest binds this to t around calls to `all-completions'. A dynamic
-completion table can take this as a hint to only return a list of one element
-for optimization.")
+capf-autosuggest binds this to t around calls to
+`all-completions'.  A dynamic completion table can take this as a
+hint to only return a list of one element for optimization.")
 
 (defvar-local capf-autosuggest--overlay nil)
 (defvar-local capf-autosuggest--str "")
@@ -53,10 +53,10 @@ for optimization.")
 (defmacro capf-autosuggest-define-partial-accept-cmd (name command)
   "Define a command NAME.
 It will call COMMAND interactively, allowing it to move point
-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'."
+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)
@@ -66,9 +66,9 @@ inactive. NAME is suitable for binding in
 (defun capf-autosuggest-call-partial-accept-cmd (command)
   "Call COMMAND interactively, stepping into auto-suggested overlay.
 Temporarily convert the overlay to buffer text and call COMMAND
-interactively. Afterwards, the added text is deleted, but only
-the portion after point. Additionally, if point is outside of the
-added text, the whole text is deleted."
+interactively.  Afterwards, the added text is deleted, but only
+the portion after point.  Additionally, if point is outside of
+the added text, the whole text is deleted."
   (let (beg end text)
     (with-silent-modifications
       (catch 'cancel-atomic-change
@@ -117,12 +117,12 @@ added text, the whole text is deleted."
                  (let ((capf-autosuggest-all-completions-only-one t))
                    ;; Use `all-completions' rather than
                    ;; `completion-all-completions' to bypass completion styles
-                   ;; and strictly match only on prefix. This makes sense here
+                   ;; and strictly match only on prefix.  This makes sense here
                    ;; as we only use the string without the prefix for the
                    ;; overlay.
                    (all-completions string table pred)))
                 ;; `all-completions' may return strings that don't strictly
-                ;; match on our prefix. Ignore them.
+                ;; match on our prefix.  Ignore them.
                 ((string-prefix-p (substring string base) (car completions)))
                 (str (substring (car completions) (- end beg base)))
                 ((/= 0 (length str))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]