diff options
| author | Katsumi Yamaoka <yamaoka@jpl.org> | 2007-10-18 22:49:05 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2007-10-18 22:49:05 +0000 |
| commit | bd3164743080f3eb5fc316aca7cc5322ca58fe33 (patch) | |
| tree | bb49236dbaddfeb2058ca0d7f13892a92d8cb490 /lisp/net/tramp.el | |
| parent | 3278f20eee991e78086bb3b93391ccf68001f586 (diff) | |
| download | emacs-bd3164743080f3eb5fc316aca7cc5322ca58fe33.tar.gz emacs-bd3164743080f3eb5fc316aca7cc5322ca58fe33.tar.bz2 emacs-bd3164743080f3eb5fc316aca7cc5322ca58fe33.zip | |
From_ Johan Bockgrd, <http://article.gmane.org/gmane.emacs.devel/81056>
* net/tramp.el (tramp-rfn-eshadow-update-overlay): Save excursion.
Use `save-restriction' rather than `widen'.
Diffstat (limited to 'lisp/net/tramp.el')
| -rw-r--r-- | lisp/net/tramp.el | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el index c8b2a72aad0..0af9c457995 100644 --- a/lisp/net/tramp.el +++ b/lisp/net/tramp.el @@ -2092,12 +2092,13 @@ been set up by `rfn-eshadow-setup-minibuffer'." (symbol-value 'rfn-eshadow-overlay)) (funcall (symbol-function 'minibuffer-prompt-end))))) (when (file-remote-p (buffer-substring-no-properties end (point-max))) - (narrow-to-region - (1+ (or (string-match "/" (buffer-string) end) end)) (point-max)) - (let ((rfn-eshadow-overlay tramp-rfn-eshadow-overlay) - (rfn-eshadow-update-overlay-hook nil)) - (funcall (symbol-function 'rfn-eshadow-update-overlay))) - (widen)))) + (save-excursion + (save-restriction + (narrow-to-region + (1+ (or (string-match "/" (buffer-string) end) end)) (point-max)) + (let ((rfn-eshadow-overlay tramp-rfn-eshadow-overlay) + (rfn-eshadow-update-overlay-hook nil)) + (funcall (symbol-function 'rfn-eshadow-update-overlay)))))))) (when (boundp 'rfn-eshadow-update-overlay-hook) (add-hook 'rfn-eshadow-update-overlay-hook |