branch: externals/pabbrev
commit 75dde004d44f21a06538cb8d7dba45c74cb92393
Author: Phillip Lord <phillip.l...@newcastle.ac.uk>
Commit: Phillip Lord <phillip.l...@newcastle.ac.uk>

    Ensure cursor is the correct position.
---
 pabbrev.el |   11 +++++------
 1 files changed, 5 insertions(+), 6 deletions(-)

diff --git a/pabbrev.el b/pabbrev.el
index 8e3713f..07c28bc 100644
--- a/pabbrev.el
+++ b/pabbrev.el
@@ -921,12 +921,11 @@ The suggestion should start with PREFIX, and be entered 
at point."
           (setq pabbrev-marker (cons (point) (point)))
           (overlay-put pabbrev-overlay
                        'after-string
-                       (propertize
-                        (concat "["
-                                (propertize expansion
-                                            'face (overlay-get pabbrev-overlay 
'face))
-                                "]")
-                        'cursor 0)))))))
+                       (concat
+                        (propertize "[" 'cursor 1)
+                        (propertize expansion
+                                    'face (overlay-get pabbrev-overlay 'face))
+                        "]")))))))
 
 (defvar pabbrev-last-expansion-suggestions nil
   "Cached alternative suggestions from the last expansion.")

Reply via email to