Mercurial > emacs
diff lisp/net/tramp-smb.el @ 59031:1fbbe0bcfaac
Sync with Tramp 2.0.46.
| author | Michael Albinus <michael.albinus@gmx.de> |
|---|---|
| date | Fri, 17 Dec 2004 19:35:45 +0000 |
| parents | 40298ea4d83f |
| children | 92796330257a eac554634bfa |
line wrap: on
line diff
--- a/lisp/net/tramp-smb.el Fri Dec 17 16:58:54 2004 +0000 +++ b/lisp/net/tramp-smb.el Fri Dec 17 19:35:45 2004 +0000 @@ -1105,9 +1105,11 @@ ;; Do `PC-do-completion' without substitution (let* (save) (fset 'save (symbol-function 'substitute-in-file-name)) - (fset 'substitute-in-file-name (symbol-function 'identity)) - ad-do-it - (fset 'substitute-in-file-name (symbol-function 'save))) + (unwind-protect + (progn + (fset 'substitute-in-file-name (symbol-function 'identity)) + ad-do-it) + (fset 'substitute-in-file-name (symbol-function 'save)))) ;; Expand "$" (let* ((beg (or (and (functionp 'minibuffer-prompt-end) ; Emacs 21