[elpa] externals/capf-autosuggest 5455064 22/63: Allow forward-sexp to enter overlay

[ELPA Syncer]

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

    Allow forward-sexp to enter overlay
---
 capf-autosuggest.el | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/capf-autosuggest.el b/capf-autosuggest.el
index 30da5eb..1042d5a 100644
--- a/capf-autosuggest.el
+++ b/capf-autosuggest.el
@@ -183,6 +183,7 @@ the added text, the whole text is deleted."
 
 (capf-autosuggest-define-partial-accept-cmd capf-autosuggest-forward-word 
forward-word)
 (capf-autosuggest-define-partial-accept-cmd capf-autosuggest-forward-char 
forward-char)
+(capf-autosuggest-define-partial-accept-cmd capf-autosuggest-forward-sexp 
forward-sexp)
 (capf-autosuggest-define-partial-accept-cmd capf-autosuggest-end-of-line 
end-of-line)
 (capf-autosuggest-define-partial-accept-cmd capf-autosuggest-move-end-of-line 
move-end-of-line)
 (capf-autosuggest-define-partial-accept-cmd 
capf-autosuggest-end-of-visual-line end-of-visual-line)
@@ -211,6 +212,7 @@ inactive."
   (let ((map (make-sparse-keymap)))
     (define-key map [remap forward-word] #'capf-autosuggest-forward-word)
     (define-key map [remap forward-char] #'capf-autosuggest-forward-char)
+    (define-key map [remap forward-sexp] #'capf-autosuggest-forward-sexp)
     (define-key map [remap end-of-line] #'capf-autosuggest-end-of-line)
     (define-key map [remap move-end-of-line] 
#'capf-autosuggest-move-end-of-line)
     (define-key map [remap end-of-visual-line] 
#'capf-autosuggest-end-of-visual-line)