branch: elpa/cider
commit f83d7684185b1a8e6acdf6be6cd8d304a92f4874
Author: IrrenWirr <85679298+irrenw...@users.noreply.github.com>
Commit: GitHub <nore...@github.com>

    [completion] Protect call to check-parens with save-mark-and-excursion 
(#3818)
    
    nasty (check-parens)
    it mess up marks selection in my idiosyncratic config of emacs
    
    So I put it in (save-mark-and-excursion) instead of only (save-excursion)
    
    The only one that was messing with my usage was in 
"cider-completion-get-info-context-at-point"
    
    but who knows, maybe "cider-completion-get-context-at-point" also mess 
someone's emacs usage
    
    So to be safe, did it to both
---
 cider-completion-context.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/cider-completion-context.el b/cider-completion-context.el
index 7eca77cf86..f4098016fc 100644
--- a/cider-completion-context.el
+++ b/cider-completion-context.el
@@ -51,7 +51,7 @@
 Note that this context is slightly different than that of
 `cider-completion-get-context-at-point': this one does not include
 the current symbol at point."
-  (when (save-excursion
+  (when (save-mark-and-excursion
           (condition-case _
               (progn
                 (up-list)
@@ -78,7 +78,7 @@ the current symbol at point."
   "Extract the context at point.
 If point is not inside the list, returns nil; otherwise return \"top-level\"
 form, with symbol at point replaced by __prefix__."
-  (when (save-excursion
+  (when (save-mark-and-excursion
           (condition-case _
               (progn
                 (up-list)

Reply via email to