# HG changeset patch # User Richard M. Stallman # Date 1130516606 0 # Node ID 63563507d684b23371e742f703ad62db6050624d # Parent 9bc148ee2fda157a04e8ffb771c8541cca947d87 (tramp-completion-mode): defvar moved up. diff -r 9bc148ee2fda -r 63563507d684 lisp/net/tramp.el --- a/lisp/net/tramp.el Fri Oct 28 16:22:47 2005 +0000 +++ b/lisp/net/tramp.el Fri Oct 28 16:23:26 2005 +0000 @@ -4369,6 +4369,9 @@ ;;; File name handler functions for completion mode +(defvar tramp-completion-mode nil + "If non-nil, we are in file name completion mode.") + ;; Necessary because `tramp-file-name-regexp-unified' and ;; `tramp-completion-file-name-regexp-unified' aren't different. ;; If nil, `tramp-completion-run-real-handler' is called (i.e. forwarding to @@ -4435,9 +4438,6 @@ (substring file (length (tramp-completion-handle-file-name-directory file)))) -(defvar tramp-completion-mode nil - "If non-nil, we are in file name completion mode.") - ;; Method, host name and user name completion. ;; `tramp-completion-dissect-file-name' returns a list of ;; tramp-file-name structures. For all of them we return possible completions.