Commit eb922adf authored by Michael Albinus's avatar Michael Albinus
Browse files

* net/ange-ftp.el (ange-ftp-run-real-handler-orig): New defun,

uses code from the previous `ange-ftp-run-real-handler'.
(ange-ftp-run-real-handler): Set it to `tramp-run-real-handler'
only in case that function exist.  This is needed for proper
unloading of Tramp.
parent 7a55aa13
2013-04-15 Michael Albinus <michael.albinus@gmx.de>
* net/ange-ftp.el (ange-ftp-run-real-handler-orig): New defun,
uses code from the previous `ange-ftp-run-real-handler'.
(ange-ftp-run-real-handler): Set it to `tramp-run-real-handler'
only in case that function exist. This is needed for proper
unloading of Tramp.
2013-04-15 Tassilo Horn <tsdh@gnu.org>
* textmodes/reftex-vars.el (reftex-label-regexps): New defcustom.
......
......@@ -4437,16 +4437,18 @@ NEWNAME should be the name to give the new compressed or uncompressed file.")
;;; Define ways of getting at unmodified Emacs primitives,
;;; turning off our handler.
;(defun ange-ftp-run-real-handler (operation args)
; (let ((inhibit-file-name-handlers
; (cons 'ange-ftp-hook-function
; (cons 'ange-ftp-completion-hook-function
; (and (eq inhibit-file-name-operation operation)
; inhibit-file-name-handlers))))
; (inhibit-file-name-operation operation))
; (apply operation args)))
(defalias 'ange-ftp-run-real-handler 'tramp-run-real-handler)
(defun ange-ftp-run-real-handler-orig (operation args)
(let ((inhibit-file-name-handlers
(cons 'ange-ftp-hook-function
(cons 'ange-ftp-completion-hook-function
(and (eq inhibit-file-name-operation operation)
inhibit-file-name-handlers))))
(inhibit-file-name-operation operation))
(apply operation args)))
(defalias 'ange-ftp-run-real-handler
(if (fboundp 'tramp-run-real-handler)
'tramp-run-real-handler 'ange-ftp-run-real-handler-orig))
(defun ange-ftp-real-file-name-directory (&rest args)
(ange-ftp-run-real-handler 'file-name-directory args))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment