procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Comple fix for Bug#32550

Browse source 
* lisp/net/tramp.el (tramp-rfn-eshadow-update-overlay):
Use `save-excursion'.  This completes the fix of Bug#32550.
This commit is contained in:
Michael Albinus 2018-10-01 14:17:27 +02:00
parent 35b56a24a0
commit 508c40ef1d
1 changed files with 14 additions and 15 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/net/tramp.el
View file

@ -1941,9 +1941,8 @@ been set up by `rfn-eshadow-setup-minibuffer'."
(minibuffer-prompt-end))) (minibuffer-prompt-end)))
;; We do not want to send any remote command. ;; We do not want to send any remote command.
(non-essential t)) (non-essential t))
(when (when (tramp-tramp-file-p (buffer-substring end (point-max)))
(tramp-tramp-file-p (save-excursion
(buffer-substring-no-properties end (point-max)))
(save-restriction (save-restriction
(narrow-to-region (narrow-to-region
(1+ (or (string-match (1+ (or (string-match
@ -1955,7 +1954,7 @@ been set up by `rfn-eshadow-setup-minibuffer'."
(rfn-eshadow-update-overlay-hook nil) (rfn-eshadow-update-overlay-hook nil)
file-name-handler-alist) file-name-handler-alist)
(move-overlay rfn-eshadow-overlay (point-max) (point-max)) (move-overlay rfn-eshadow-overlay (point-max) (point-max))
(rfn-eshadow-update-overlay))))))) (rfn-eshadow-update-overlay))))))))
(add-hook 'rfn-eshadow-update-overlay-hook (add-hook 'rfn-eshadow-update-overlay-hook
'tramp-rfn-eshadow-update-overlay) 'tramp-rfn-eshadow-update-overlay)