tramp (2.2.6-pre); Persistent attempts to "go remote"

[Dave Abrahams]

Enter your bug report in this message, including as much detail
as you possibly can about the problem, what you did to cause it
and what the local and remote machines are.

If you can give a simple set of instructions to make this bug
happen reliably, please include those.  Thank you for helping
kill bugs in Tramp.

Before reproducing the bug, you might apply

  M-x tramp-cleanup-all-connections

This allows to investigate from a clean environment.  Another
useful thing to do is to put

  (setq tramp-verbose 9)

in the ~/.emacs file and to repeat the bug.  Then, include the
contents of the *tramp/foo* buffer and the *debug tramp/foo*
buffer in your bug report.

--bug report follows this line--

Hi Michael,

Despite having done tramp-cleanup-all-connections and
tramp-cleanup-all-buffers, my use of `M-x shell-command ... &' with
something that invokes emacsclient is causing TRAMP to try to reconnect.
I'm not sure of the reasons; the stack trace seems to indicate that EDE
may be involved.  I'll try to leave this Emacs process around so we can
debug it...

--8<---------------cut here---------------start------------->8---
  tramp-process-actions(#<process *tramp/scpc io.local*> ["scpc" nil "io.local" 
"/private/tmp/emacs-mac-mrNX/" nil] 89 ((tramp-login-prompt-regexp 
tramp-action-login) (tramp-password-prompt-regexp tramp-action-password) 
(tramp-wrong-passwd-regexp tramp-action-permission-denied) 
(shell-prompt-pattern tramp-action-succeed) (tramp-shell-prompt-pattern 
tramp-action-succeed) (tramp-yesno-prompt-regexp tramp-action-yesno) 
(tramp-yn-prompt-regexp tramp-action-yn) (tramp-terminal-prompt-regexp 
tramp-action-terminal) (tramp-process-alive-regexp tramp-action-process-alive)) 
60)
  (let* ((hop (car target-alist)) (l-method (tramp-file-name-method hop)) 
(l-user (tramp-file-name-user hop)) (l-host (tramp-file-name-host hop)) (l-port 
nil) (login-program (tramp-get-method-parameter l-method (quote 
tramp-login-program))) (login-args (tramp-get-method-parameter l-method (quote 
tramp-login-args))) (async-args (tramp-get-method-parameter l-method (quote 
tramp-async-args))) (gw-args (tramp-get-method-parameter l-method (quote 
tramp-gw-args))) (gw (tramp-get-file-property hop "" "gateway" nil)) (g-method 
(and gw (tramp-file-name-method gw))) (g-user (and gw (tramp-file-name-user 
gw))) (g-host (and gw (tramp-file-name-real-host gw))) (command login-program) 
(tmpfile (tramp-set-connection-property p "temp-file" (make-temp-name 
(expand-file-name tramp-temp-name-prefix 
(tramp-compat-temporary-file-directory))))) spec) (when (and process-name 
async-args) (setq login-args (append async-args login-args))) (when (and gw 
gw-args) (setq login-args (append gw-args login-args))) (when (string-match 
tramp-host-with-port-regexp l-host) (setq l-port (match-string 2 l-host) l-host 
(match-string 1 l-host))) (setq tramp-current-method (or g-method l-method) 
tramp-current-user (or g-user l-user) tramp-current-host (or g-host l-host)) 
(setq l-host (or l-host "") l-user (or l-user "") l-port (or l-port "") spec 
(format-spec-make 104 l-host 117 l-user 112 l-port 116 tmpfile) command (concat 
(unless (memq system-type (quote (windows-nt))) "exec ") command " " (mapconcat 
(lambda (x) (setq x (mapcar (lambda ... ...) x)) (unless (member "" x) 
(mapconcat (quote identity) x " "))) login-args " ") (if (memq system-type 
(quote (windows-nt))) " && exit || exit"))) (tramp-message vec 3 "Sending 
command `%s'" command) (tramp-send-command vec command t t) 
(tramp-process-actions p vec pos tramp-actions-before-shell 60) (tramp-message 
vec 3 "Found remote shell prompt on `%s'" l-host))
  (while target-alist (let* ((hop (car target-alist)) (l-method 
(tramp-file-name-method hop)) (l-user (tramp-file-name-user hop)) (l-host 
(tramp-file-name-host hop)) (l-port nil) (login-program 
(tramp-get-method-parameter l-method (quote tramp-login-program))) (login-args 
(tramp-get-method-parameter l-method (quote tramp-login-args))) (async-args 
(tramp-get-method-parameter l-method (quote tramp-async-args))) (gw-args 
(tramp-get-method-parameter l-method (quote tramp-gw-args))) (gw 
(tramp-get-file-property hop "" "gateway" nil)) (g-method (and gw 
(tramp-file-name-method gw))) (g-user (and gw (tramp-file-name-user gw))) 
(g-host (and gw (tramp-file-name-real-host gw))) (command login-program) 
(tmpfile (tramp-set-connection-property p "temp-file" (make-temp-name 
(expand-file-name tramp-temp-name-prefix 
(tramp-compat-temporary-file-directory))))) spec) (when (and process-name 
async-args) (setq login-args (append async-args login-args))) (when (and gw 
gw-args) (setq login-args (append gw-args login-args))) (when (string-match 
tramp-host-with-port-regexp l-host) (setq l-port (match-string 2 l-host) l-host 
(match-string 1 l-host))) (setq tramp-current-method (or g-method l-method) 
tramp-current-user (or g-user l-user) tramp-current-host (or g-host l-host)) 
(setq l-host (or l-host "") l-user (or l-user "") l-port (or l-port "") spec 
(format-spec-make 104 l-host 117 l-user 112 l-port 116 tmpfile) command (concat 
(unless (memq system-type (quote (windows-nt))) "exec ") command " " (mapconcat 
(lambda (x) (setq x (mapcar ... x)) (unless (member "" x) (mapconcat ... x " 
"))) login-args " ") (if (memq system-type (quote (windows-nt))) " && exit || 
exit"))) (tramp-message vec 3 "Sending command `%s'" command) 
(tramp-send-command vec command t t) (tramp-process-actions p vec pos 
tramp-actions-before-shell 60) (tramp-message vec 3 "Found remote shell prompt 
on `%s'" l-host)) (setq target-alist (cdr target-alist)))
  (let* ((target-alist (tramp-compute-multi-hops vec)) (process-connection-type 
tramp-process-connection-type) (process-adaptive-read-buffering nil) 
(coding-system-for-read nil) (p (let ((default-directory 
(tramp-compat-temporary-file-directory))) (apply (quote start-process) 
(tramp-get-connection-name vec) (tramp-get-connection-buffer vec) (if 
tramp-encoding-command-interactive (list tramp-encoding-shell 
tramp-encoding-command-interactive) (list tramp-encoding-shell)))))) 
(tramp-set-connection-property p "vector" vec) (set-process-sentinel p (quote 
tramp-process-sentinel)) (tramp-compat-set-process-query-on-exit-flag p nil) 
(setq tramp-current-connection (cons (butlast (append vec nil)) 
(current-time))) (tramp-message vec 6 "%s" (mapconcat (quote identity) 
(process-command p) " ")) (tramp-barf-if-no-shell-prompt p 60 "Couldn't find 
local shell prompt %s" tramp-encoding-shell) (while target-alist (let* ((hop 
(car target-alist)) (l-method (tramp-file-name-method hop)) (l-user 
(tramp-file-name-user hop)) (l-host (tramp-file-name-host hop)) (l-port nil) 
(login-program (tramp-get-method-parameter l-method (quote 
tramp-login-program))) (login-args (tramp-get-method-parameter l-method (quote 
tramp-login-args))) (async-args (tramp-get-method-parameter l-method (quote 
tramp-async-args))) (gw-args (tramp-get-method-parameter l-method (quote 
tramp-gw-args))) (gw (tramp-get-file-property hop "" "gateway" nil)) (g-method 
(and gw (tramp-file-name-method gw))) (g-user (and gw (tramp-file-name-user 
gw))) (g-host (and gw (tramp-file-name-real-host gw))) (command login-program) 
(tmpfile (tramp-set-connection-property p "temp-file" (make-temp-name 
(expand-file-name tramp-temp-name-prefix ...)))) spec) (when (and process-name 
async-args) (setq login-args (append async-args login-args))) (when (and gw 
gw-args) (setq login-args (append gw-args login-args))) (when (string-match 
tramp-host-with-port-regexp l-host) (setq l-port (match-string 2 l-host) l-host 
(match-string 1 l-host))) (setq tramp-current-method (or g-method l-method) 
tramp-current-user (or g-user l-user) tramp-current-host (or g-host l-host)) 
(setq l-host (or l-host "") l-user (or l-user "") l-port (or l-port "") spec 
(format-spec-make 104 l-host 117 l-user 112 l-port 116 tmpfile) command (concat 
(unless (memq system-type (quote ...)) "exec ") command " " (mapconcat (lambda 
(x) (setq x ...) (unless ... ...)) login-args " ") (if (memq system-type (quote 
...)) " && exit || exit"))) (tramp-message vec 3 "Sending command `%s'" 
command) (tramp-send-command vec command t t) (tramp-process-actions p vec pos 
tramp-actions-before-shell 60) (tramp-message vec 3 "Found remote shell prompt 
on `%s'" l-host)) (setq target-alist (cdr target-alist))) 
(tramp-open-connection-setup-interactive-shell p vec))
  (let ((tramp-message-show-progress-reporter-message (and 
tramp-message-show-progress-reporter-message (not tm)))) (when (and p (processp 
p)) (delete-process p)) (setenv "TERM" tramp-terminal-type) (setenv "LC_ALL" 
"C") (setenv "PROMPT_COMMAND") (setenv "PS1" tramp-initial-end-of-output) (let* 
((target-alist (tramp-compute-multi-hops vec)) (process-connection-type 
tramp-process-connection-type) (process-adaptive-read-buffering nil) 
(coding-system-for-read nil) (p (let ((default-directory 
(tramp-compat-temporary-file-directory))) (apply (quote start-process) 
(tramp-get-connection-name vec) (tramp-get-connection-buffer vec) (if 
tramp-encoding-command-interactive (list tramp-encoding-shell 
tramp-encoding-command-interactive) (list tramp-encoding-shell)))))) 
(tramp-set-connection-property p "vector" vec) (set-process-sentinel p (quote 
tramp-process-sentinel)) (tramp-compat-set-process-query-on-exit-flag p nil) 
(setq tramp-current-connection (cons (butlast (append vec nil)) 
(current-time))) (tramp-message vec 6 "%s" (mapconcat (quote identity) 
(process-command p) " ")) (tramp-barf-if-no-shell-prompt p 60 "Couldn't find 
local shell prompt %s" tramp-encoding-shell) (while target-alist (let* ((hop 
(car target-alist)) (l-method (tramp-file-name-method hop)) (l-user 
(tramp-file-name-user hop)) (l-host (tramp-file-name-host hop)) (l-port nil) 
(login-program (tramp-get-method-parameter l-method (quote 
tramp-login-program))) (login-args (tramp-get-method-parameter l-method (quote 
tramp-login-args))) (async-args (tramp-get-method-parameter l-method (quote 
tramp-async-args))) (gw-args (tramp-get-method-parameter l-method (quote 
tramp-gw-args))) (gw (tramp-get-file-property hop "" "gateway" nil)) (g-method 
(and gw (tramp-file-name-method gw))) (g-user (and gw (tramp-file-name-user 
gw))) (g-host (and gw (tramp-file-name-real-host gw))) (command login-program) 
(tmpfile (tramp-set-connection-property p "temp-file" (make-temp-name ...))) 
spec) (when (and process-name async-args) (setq login-args (append async-args 
login-args))) (when (and gw gw-args) (setq login-args (append gw-args 
login-args))) (when (string-match tramp-host-with-port-regexp l-host) (setq 
l-port (match-string 2 l-host) l-host (match-string 1 l-host))) (setq 
tramp-current-method (or g-method l-method) tramp-current-user (or g-user 
l-user) tramp-current-host (or g-host l-host)) (setq l-host (or l-host "") 
l-user (or l-user "") l-port (or l-port "") spec (format-spec-make 104 l-host 
117 l-user 112 l-port 116 tmpfile) command (concat (unless (memq system-type 
...) "exec ") command " " (mapconcat (lambda ... ... ...) login-args " ") (if 
(memq system-type ...) " && exit || exit"))) (tramp-message vec 3 "Sending 
command `%s'" command) (tramp-send-command vec command t t) 
(tramp-process-actions p vec pos tramp-actions-before-shell 60) (tramp-message 
vec 3 "Found remote shell prompt on `%s'" l-host)) (setq target-alist (cdr 
target-alist))) (tramp-open-connection-setup-interactive-shell p vec)))
  (unwind-protect (let ((tramp-message-show-progress-reporter-message (and 
tramp-message-show-progress-reporter-message (not tm)))) (when (and p (processp 
p)) (delete-process p)) (setenv "TERM" tramp-terminal-type) (setenv "LC_ALL" 
"C") (setenv "PROMPT_COMMAND") (setenv "PS1" tramp-initial-end-of-output) (let* 
((target-alist (tramp-compute-multi-hops vec)) (process-connection-type 
tramp-process-connection-type) (process-adaptive-read-buffering nil) 
(coding-system-for-read nil) (p (let ((default-directory ...)) (apply (quote 
start-process) (tramp-get-connection-name vec) (tramp-get-connection-buffer 
vec) (if tramp-encoding-command-interactive ... ...))))) 
(tramp-set-connection-property p "vector" vec) (set-process-sentinel p (quote 
tramp-process-sentinel)) (tramp-compat-set-process-query-on-exit-flag p nil) 
(setq tramp-current-connection (cons (butlast (append vec nil)) 
(current-time))) (tramp-message vec 6 "%s" (mapconcat (quote identity) 
(process-command p) " ")) (tramp-barf-if-no-shell-prompt p 60 "Couldn't find 
local shell prompt %s" tramp-encoding-shell) (while target-alist (let* ((hop 
(car target-alist)) (l-method (tramp-file-name-method hop)) (l-user 
(tramp-file-name-user hop)) (l-host (tramp-file-name-host hop)) (l-port nil) 
(login-program (tramp-get-method-parameter l-method ...)) (login-args 
(tramp-get-method-parameter l-method ...)) (async-args 
(tramp-get-method-parameter l-method ...)) (gw-args (tramp-get-method-parameter 
l-method ...)) (gw (tramp-get-file-property hop "" "gateway" nil)) (g-method 
(and gw ...)) (g-user (and gw ...)) (g-host (and gw ...)) (command 
login-program) (tmpfile (tramp-set-connection-property p "temp-file" ...)) 
spec) (when (and process-name async-args) (setq login-args (append async-args 
login-args))) (when (and gw gw-args) (setq login-args (append gw-args 
login-args))) (when (string-match tramp-host-with-port-regexp l-host) (setq 
l-port (match-string 2 l-host) l-host (match-string 1 l-host))) (setq 
tramp-current-method (or g-method l-method) tramp-current-user (or g-user 
l-user) tramp-current-host (or g-host l-host)) (setq l-host (or l-host "") 
l-user (or l-user "") l-port (or l-port "") spec (format-spec-make 104 l-host 
117 l-user 112 l-port 116 tmpfile) command (concat (unless ... "exec ") command 
" " (mapconcat ... login-args " ") (if ... " && exit || exit"))) (tramp-message 
vec 3 "Sending command `%s'" command) (tramp-send-command vec command t t) 
(tramp-process-actions p vec pos tramp-actions-before-shell 60) (tramp-message 
vec 3 "Found remote shell prompt on `%s'" l-host)) (setq target-alist (cdr 
target-alist))) (tramp-open-connection-setup-interactive-shell p vec))) (if tm 
(tramp-compat-funcall (quote cancel-timer) tm)) (tramp-message vec 3 
"%s...done" (if (zerop (length (tramp-file-name-user vec))) (format "Opening 
connection for %s using %s" (tramp-file-name-host vec) (tramp-file-name-method 
vec)) (format "Opening connection for address@hidden using %s" 
(tramp-file-name-user vec) (tramp-file-name-host vec) (tramp-file-name-method 
vec)))))
  (let (pr tm) (tramp-message vec 3 "%s..." (if (zerop (length 
(tramp-file-name-user vec))) (format "Opening connection for %s using %s" 
(tramp-file-name-host vec) (tramp-file-name-method vec)) (format "Opening 
connection for address@hidden using %s" (tramp-file-name-user vec) 
(tramp-file-name-host vec) (tramp-file-name-method vec)))) (when (and 
tramp-message-show-progress-reporter-message tramp-message-show-message (<= 3 
(min tramp-verbose 3))) (ignore-errors (setq pr (tramp-compat-funcall (quote 
make-progress-reporter) (if (zerop (length ...)) (format "Opening connection 
for %s using %s" (tramp-file-name-host vec) (tramp-file-name-method vec)) 
(format "Opening connection for address@hidden using %s" (tramp-file-name-user 
vec) (tramp-file-name-host vec) (tramp-file-name-method vec)))) tm (when pr 
(run-at-time 3 0.1 (quote tramp-progress-reporter-update) pr))))) 
(unwind-protect (let ((tramp-message-show-progress-reporter-message (and 
tramp-message-show-progress-reporter-message (not tm)))) (when (and p (processp 
p)) (delete-process p)) (setenv "TERM" tramp-terminal-type) (setenv "LC_ALL" 
"C") (setenv "PROMPT_COMMAND") (setenv "PS1" tramp-initial-end-of-output) (let* 
((target-alist (tramp-compute-multi-hops vec)) (process-connection-type 
tramp-process-connection-type) (process-adaptive-read-buffering nil) 
(coding-system-for-read nil) (p (let (...) (apply ... ... ... ...)))) 
(tramp-set-connection-property p "vector" vec) (set-process-sentinel p (quote 
tramp-process-sentinel)) (tramp-compat-set-process-query-on-exit-flag p nil) 
(setq tramp-current-connection (cons (butlast (append vec nil)) 
(current-time))) (tramp-message vec 6 "%s" (mapconcat (quote identity) 
(process-command p) " ")) (tramp-barf-if-no-shell-prompt p 60 "Couldn't find 
local shell prompt %s" tramp-encoding-shell) (while target-alist (let* ((hop 
...) (l-method ...) (l-user ...) (l-host ...) (l-port nil) (login-program ...) 
(login-args ...) (async-args ...) (gw-args ...) (gw ...) (g-method ...) (g-user 
...) (g-host ...) (command login-program) (tmpfile ...) spec) (when (and 
process-name async-args) (setq login-args ...)) (when (and gw gw-args) (setq 
login-args ...)) (when (string-match tramp-host-with-port-regexp l-host) (setq 
l-port ... l-host ...)) (setq tramp-current-method (or g-method l-method) 
tramp-current-user (or g-user l-user) tramp-current-host (or g-host l-host)) 
(setq l-host (or l-host "") l-user (or l-user "") l-port (or l-port "") spec 
(format-spec-make 104 l-host 117 l-user 112 l-port 116 tmpfile) command (concat 
... command " " ... ...)) (tramp-message vec 3 "Sending command `%s'" command) 
(tramp-send-command vec command t t) (tramp-process-actions p vec pos 
tramp-actions-before-shell 60) (tramp-message vec 3 "Found remote shell prompt 
on `%s'" l-host)) (setq target-alist (cdr target-alist))) 
(tramp-open-connection-setup-interactive-shell p vec))) (if tm 
(tramp-compat-funcall (quote cancel-timer) tm)) (tramp-message vec 3 
"%s...done" (if (zerop (length (tramp-file-name-user vec))) (format "Opening 
connection for %s using %s" (tramp-file-name-host vec) (tramp-file-name-method 
vec)) (format "Opening connection for address@hidden using %s" 
(tramp-file-name-user vec) (tramp-file-name-host vec) (tramp-file-name-method 
vec))))))
  (tramp-with-progress-reporter vec 3 (if (zerop (length (tramp-file-name-user 
vec))) (format "Opening connection for %s using %s" (tramp-file-name-host vec) 
(tramp-file-name-method vec)) (format "Opening connection for address@hidden 
using %s" (tramp-file-name-user vec) (tramp-file-name-host vec) 
(tramp-file-name-method vec))) (when (and p (processp p)) (delete-process p)) 
(setenv "TERM" tramp-terminal-type) (setenv "LC_ALL" "C") (setenv 
"PROMPT_COMMAND") (setenv "PS1" tramp-initial-end-of-output) (let* 
((target-alist (tramp-compute-multi-hops vec)) (process-connection-type 
tramp-process-connection-type) (process-adaptive-read-buffering nil) 
(coding-system-for-read nil) (p (let ((default-directory 
(tramp-compat-temporary-file-directory))) (apply (quote start-process) 
(tramp-get-connection-name vec) (tramp-get-connection-buffer vec) (if 
tramp-encoding-command-interactive (list tramp-encoding-shell 
tramp-encoding-command-interactive) (list tramp-encoding-shell)))))) 
(tramp-set-connection-property p "vector" vec) (set-process-sentinel p (quote 
tramp-process-sentinel)) (tramp-compat-set-process-query-on-exit-flag p nil) 
(setq tramp-current-connection (cons (butlast (append vec nil)) 
(current-time))) (tramp-message vec 6 "%s" (mapconcat (quote identity) 
(process-command p) " ")) (tramp-barf-if-no-shell-prompt p 60 "Couldn't find 
local shell prompt %s" tramp-encoding-shell) (while target-alist (let* ((hop 
(car target-alist)) (l-method (tramp-file-name-method hop)) (l-user 
(tramp-file-name-user hop)) (l-host (tramp-file-name-host hop)) (l-port nil) 
(login-program (tramp-get-method-parameter l-method (quote 
tramp-login-program))) (login-args (tramp-get-method-parameter l-method (quote 
tramp-login-args))) (async-args (tramp-get-method-parameter l-method (quote 
tramp-async-args))) (gw-args (tramp-get-method-parameter l-method (quote 
tramp-gw-args))) (gw (tramp-get-file-property hop "" "gateway" nil)) (g-method 
(and gw (tramp-file-name-method gw))) (g-user (and gw (tramp-file-name-user 
gw))) (g-host (and gw (tramp-file-name-real-host gw))) (command login-program) 
(tmpfile (tramp-set-connection-property p "temp-file" (make-temp-name ...))) 
spec) (when (and process-name async-args) (setq login-args (append async-args 
login-args))) (when (and gw gw-args) (setq login-args (append gw-args 
login-args))) (when (string-match tramp-host-with-port-regexp l-host) (setq 
l-port (match-string 2 l-host) l-host (match-string 1 l-host))) (setq 
tramp-current-method (or g-method l-method) tramp-current-user (or g-user 
l-user) tramp-current-host (or g-host l-host)) (setq l-host (or l-host "") 
l-user (or l-user "") l-port (or l-port "") spec (format-spec-make 104 l-host 
117 l-user 112 l-port 116 tmpfile) command (concat (unless (memq system-type 
...) "exec ") command " " (mapconcat (lambda ... ... ...) login-args " ") (if 
(memq system-type ...) " && exit || exit"))) (tramp-message vec 3 "Sending 
command `%s'" command) (tramp-send-command vec command t t) 
(tramp-process-actions p vec pos tramp-actions-before-shell 60) (tramp-message 
vec 3 "Found remote shell prompt on `%s'" l-host)) (setq target-alist (cdr 
target-alist))) (tramp-open-connection-setup-interactive-shell p vec)))
  (if (and p (processp p) (memq (process-status p) (quote (run open)))) nil 
(tramp-get-buffer vec) (when (and (boundp (quote non-essential)) (symbol-value 
(quote non-essential))) (throw (quote non-essential) (quote non-essential))) 
(tramp-with-progress-reporter vec 3 (if (zerop (length (tramp-file-name-user 
vec))) (format "Opening connection for %s using %s" (tramp-file-name-host vec) 
(tramp-file-name-method vec)) (format "Opening connection for address@hidden 
using %s" (tramp-file-name-user vec) (tramp-file-name-host vec) 
(tramp-file-name-method vec))) (when (and p (processp p)) (delete-process p)) 
(setenv "TERM" tramp-terminal-type) (setenv "LC_ALL" "C") (setenv 
"PROMPT_COMMAND") (setenv "PS1" tramp-initial-end-of-output) (let* 
((target-alist (tramp-compute-multi-hops vec)) (process-connection-type 
tramp-process-connection-type) (process-adaptive-read-buffering nil) 
(coding-system-for-read nil) (p (let ((default-directory ...)) (apply (quote 
start-process) (tramp-get-connection-name vec) (tramp-get-connection-buffer 
vec) (if tramp-encoding-command-interactive ... ...))))) 
(tramp-set-connection-property p "vector" vec) (set-process-sentinel p (quote 
tramp-process-sentinel)) (tramp-compat-set-process-query-on-exit-flag p nil) 
(setq tramp-current-connection (cons (butlast (append vec nil)) 
(current-time))) (tramp-message vec 6 "%s" (mapconcat (quote identity) 
(process-command p) " ")) (tramp-barf-if-no-shell-prompt p 60 "Couldn't find 
local shell prompt %s" tramp-encoding-shell) (while target-alist (let* ((hop 
(car target-alist)) (l-method (tramp-file-name-method hop)) (l-user 
(tramp-file-name-user hop)) (l-host (tramp-file-name-host hop)) (l-port nil) 
(login-program (tramp-get-method-parameter l-method ...)) (login-args 
(tramp-get-method-parameter l-method ...)) (async-args 
(tramp-get-method-parameter l-method ...)) (gw-args (tramp-get-method-parameter 
l-method ...)) (gw (tramp-get-file-property hop "" "gateway" nil)) (g-method 
(and gw ...)) (g-user (and gw ...)) (g-host (and gw ...)) (command 
login-program) (tmpfile (tramp-set-connection-property p "temp-file" ...)) 
spec) (when (and process-name async-args) (setq login-args (append async-args 
login-args))) (when (and gw gw-args) (setq login-args (append gw-args 
login-args))) (when (string-match tramp-host-with-port-regexp l-host) (setq 
l-port (match-string 2 l-host) l-host (match-string 1 l-host))) (setq 
tramp-current-method (or g-method l-method) tramp-current-user (or g-user 
l-user) tramp-current-host (or g-host l-host)) (setq l-host (or l-host "") 
l-user (or l-user "") l-port (or l-port "") spec (format-spec-make 104 l-host 
117 l-user 112 l-port 116 tmpfile) command (concat (unless ... "exec ") command 
" " (mapconcat ... login-args " ") (if ... " && exit || exit"))) (tramp-message 
vec 3 "Sending command `%s'" command) (tramp-send-command vec command t t) 
(tramp-process-actions p vec pos tramp-actions-before-shell 60) (tramp-message 
vec 3 "Found remote shell prompt on `%s'" l-host)) (setq target-alist (cdr 
target-alist))) (tramp-open-connection-setup-interactive-shell p vec))))
  (unless (and p (processp p) (memq (process-status p) (quote (run open)))) 
(tramp-get-buffer vec) (when (and (boundp (quote non-essential)) (symbol-value 
(quote non-essential))) (throw (quote non-essential) (quote non-essential))) 
(tramp-with-progress-reporter vec 3 (if (zerop (length (tramp-file-name-user 
vec))) (format "Opening connection for %s using %s" (tramp-file-name-host vec) 
(tramp-file-name-method vec)) (format "Opening connection for address@hidden 
using %s" (tramp-file-name-user vec) (tramp-file-name-host vec) 
(tramp-file-name-method vec))) (when (and p (processp p)) (delete-process p)) 
(setenv "TERM" tramp-terminal-type) (setenv "LC_ALL" "C") (setenv 
"PROMPT_COMMAND") (setenv "PS1" tramp-initial-end-of-output) (let* 
((target-alist (tramp-compute-multi-hops vec)) (process-connection-type 
tramp-process-connection-type) (process-adaptive-read-buffering nil) 
(coding-system-for-read nil) (p (let ((default-directory ...)) (apply (quote 
start-process) (tramp-get-connection-name vec) (tramp-get-connection-buffer 
vec) (if tramp-encoding-command-interactive ... ...))))) 
(tramp-set-connection-property p "vector" vec) (set-process-sentinel p (quote 
tramp-process-sentinel)) (tramp-compat-set-process-query-on-exit-flag p nil) 
(setq tramp-current-connection (cons (butlast (append vec nil)) 
(current-time))) (tramp-message vec 6 "%s" (mapconcat (quote identity) 
(process-command p) " ")) (tramp-barf-if-no-shell-prompt p 60 "Couldn't find 
local shell prompt %s" tramp-encoding-shell) (while target-alist (let* ((hop 
(car target-alist)) (l-method (tramp-file-name-method hop)) (l-user 
(tramp-file-name-user hop)) (l-host (tramp-file-name-host hop)) (l-port nil) 
(login-program (tramp-get-method-parameter l-method ...)) (login-args 
(tramp-get-method-parameter l-method ...)) (async-args 
(tramp-get-method-parameter l-method ...)) (gw-args (tramp-get-method-parameter 
l-method ...)) (gw (tramp-get-file-property hop "" "gateway" nil)) (g-method 
(and gw ...)) (g-user (and gw ...)) (g-host (and gw ...)) (command 
login-program) (tmpfile (tramp-set-connection-property p "temp-file" ...)) 
spec) (when (and process-name async-args) (setq login-args (append async-args 
login-args))) (when (and gw gw-args) (setq login-args (append gw-args 
login-args))) (when (string-match tramp-host-with-port-regexp l-host) (setq 
l-port (match-string 2 l-host) l-host (match-string 1 l-host))) (setq 
tramp-current-method (or g-method l-method) tramp-current-user (or g-user 
l-user) tramp-current-host (or g-host l-host)) (setq l-host (or l-host "") 
l-user (or l-user "") l-port (or l-port "") spec (format-spec-make 104 l-host 
117 l-user 112 l-port 116 tmpfile) command (concat (unless ... "exec ") command 
" " (mapconcat ... login-args " ") (if ... " && exit || exit"))) (tramp-message 
vec 3 "Sending command `%s'" command) (tramp-send-command vec command t t) 
(tramp-process-actions p vec pos tramp-actions-before-shell 60) (tramp-message 
vec 3 "Found remote shell prompt on `%s'" l-host)) (setq target-alist (cdr 
target-alist))) (tramp-open-connection-setup-interactive-shell p vec))))
  (condition-case err (unless (and p (processp p) (memq (process-status p) 
(quote (run open)))) (tramp-get-buffer vec) (when (and (boundp (quote 
non-essential)) (symbol-value (quote non-essential))) (throw (quote 
non-essential) (quote non-essential))) (tramp-with-progress-reporter vec 3 (if 
(zerop (length (tramp-file-name-user vec))) (format "Opening connection for %s 
using %s" (tramp-file-name-host vec) (tramp-file-name-method vec)) (format 
"Opening connection for address@hidden using %s" (tramp-file-name-user vec) 
(tramp-file-name-host vec) (tramp-file-name-method vec))) (when (and p 
(processp p)) (delete-process p)) (setenv "TERM" tramp-terminal-type) (setenv 
"LC_ALL" "C") (setenv "PROMPT_COMMAND") (setenv "PS1" 
tramp-initial-end-of-output) (let* ((target-alist (tramp-compute-multi-hops 
vec)) (process-connection-type tramp-process-connection-type) 
(process-adaptive-read-buffering nil) (coding-system-for-read nil) (p (let 
(...) (apply ... ... ... ...)))) (tramp-set-connection-property p "vector" vec) 
(set-process-sentinel p (quote tramp-process-sentinel)) 
(tramp-compat-set-process-query-on-exit-flag p nil) (setq 
tramp-current-connection (cons (butlast (append vec nil)) (current-time))) 
(tramp-message vec 6 "%s" (mapconcat (quote identity) (process-command p) " ")) 
(tramp-barf-if-no-shell-prompt p 60 "Couldn't find local shell prompt %s" 
tramp-encoding-shell) (while target-alist (let* ((hop ...) (l-method ...) 
(l-user ...) (l-host ...) (l-port nil) (login-program ...) (login-args ...) 
(async-args ...) (gw-args ...) (gw ...) (g-method ...) (g-user ...) (g-host 
...) (command login-program) (tmpfile ...) spec) (when (and process-name 
async-args) (setq login-args ...)) (when (and gw gw-args) (setq login-args 
...)) (when (string-match tramp-host-with-port-regexp l-host) (setq l-port ... 
l-host ...)) (setq tramp-current-method (or g-method l-method) 
tramp-current-user (or g-user l-user) tramp-current-host (or g-host l-host)) 
(setq l-host (or l-host "") l-user (or l-user "") l-port (or l-port "") spec 
(format-spec-make 104 l-host 117 l-user 112 l-port 116 tmpfile) command (concat 
... command " " ... ...)) (tramp-message vec 3 "Sending command `%s'" command) 
(tramp-send-command vec command t t) (tramp-process-actions p vec pos 
tramp-actions-before-shell 60) (tramp-message vec 3 "Found remote shell prompt 
on `%s'" l-host)) (setq target-alist (cdr target-alist))) 
(tramp-open-connection-setup-interactive-shell p vec)))) (quit (tramp-cleanup 
vec) (signal (car err) (cdr err))))
  (let ((p (tramp-get-connection-process vec)) (process-name 
(tramp-get-connection-property vec "process-name" nil)) (process-environment 
(copy-sequence process-environment)) (pos (with-current-buffer 
(tramp-get-connection-buffer vec) (point)))) (unless (or (and p (processp p) 
(memq (process-status p) (quote (run open)))) (not (equal (butlast (append vec 
nil)) (car tramp-current-connection))) (> (tramp-time-diff (current-time) (cdr 
tramp-current-connection)) 5)) (throw (quote suppress) (quote suppress))) 
(condition-case nil (when (and (> (tramp-time-diff (current-time) 
(tramp-get-connection-property p "last-cmd-time" (quote ...))) 60) p (processp 
p) (memq (process-status p) (quote (run open)))) (tramp-send-command vec "echo 
are you awake" t t) (unless (and (memq (process-status p) (quote (run open))) 
(tramp-wait-for-output p 10)) (tramp-error vec (quote file-error) "Awake did 
fail"))) (file-error (tramp-cleanup vec) (setq p nil))) (condition-case err 
(unless (and p (processp p) (memq (process-status p) (quote (run open)))) 
(tramp-get-buffer vec) (when (and (boundp (quote non-essential)) (symbol-value 
(quote non-essential))) (throw (quote non-essential) (quote non-essential))) 
(tramp-with-progress-reporter vec 3 (if (zerop (length (tramp-file-name-user 
vec))) (format "Opening connection for %s using %s" (tramp-file-name-host vec) 
(tramp-file-name-method vec)) (format "Opening connection for address@hidden 
using %s" (tramp-file-name-user vec) (tramp-file-name-host vec) 
(tramp-file-name-method vec))) (when (and p (processp p)) (delete-process p)) 
(setenv "TERM" tramp-terminal-type) (setenv "LC_ALL" "C") (setenv 
"PROMPT_COMMAND") (setenv "PS1" tramp-initial-end-of-output) (let* 
((target-alist (tramp-compute-multi-hops vec)) (process-connection-type 
tramp-process-connection-type) (process-adaptive-read-buffering nil) 
(coding-system-for-read nil) (p (let ... ...))) (tramp-set-connection-property 
p "vector" vec) (set-process-sentinel p (quote tramp-process-sentinel)) 
(tramp-compat-set-process-query-on-exit-flag p nil) (setq 
tramp-current-connection (cons (butlast ...) (current-time))) (tramp-message 
vec 6 "%s" (mapconcat (quote identity) (process-command p) " ")) 
(tramp-barf-if-no-shell-prompt p 60 "Couldn't find local shell prompt %s" 
tramp-encoding-shell) (while target-alist (let* (... ... ... ... ... ... ... 
... ... ... ... ... ... ... ... spec) (when ... ...) (when ... ...) (when ... 
...) (setq tramp-current-method ... tramp-current-user ... tramp-current-host 
...) (setq l-host ... l-user ... l-port ... spec ... command ...) 
(tramp-message vec 3 "Sending command `%s'" command) (tramp-send-command vec 
command t t) (tramp-process-actions p vec pos tramp-actions-before-shell 60) 
(tramp-message vec 3 "Found remote shell prompt on `%s'" l-host)) (setq 
target-alist (cdr target-alist))) 
(tramp-open-connection-setup-interactive-shell p vec)))) (quit (tramp-cleanup 
vec) (signal (car err) (cdr err)))))
  (catch (quote uname-changed) (let ((p (tramp-get-connection-process vec)) 
(process-name (tramp-get-connection-property vec "process-name" nil)) 
(process-environment (copy-sequence process-environment)) (pos 
(with-current-buffer (tramp-get-connection-buffer vec) (point)))) (unless (or 
(and p (processp p) (memq (process-status p) (quote (run open)))) (not (equal 
(butlast (append vec nil)) (car tramp-current-connection))) (> (tramp-time-diff 
(current-time) (cdr tramp-current-connection)) 5)) (throw (quote suppress) 
(quote suppress))) (condition-case nil (when (and (> (tramp-time-diff 
(current-time) (tramp-get-connection-property p "last-cmd-time" ...)) 60) p 
(processp p) (memq (process-status p) (quote (run open)))) (tramp-send-command 
vec "echo are you awake" t t) (unless (and (memq (process-status p) (quote 
...)) (tramp-wait-for-output p 10)) (tramp-error vec (quote file-error) "Awake 
did fail"))) (file-error (tramp-cleanup vec) (setq p nil))) (condition-case err 
(unless (and p (processp p) (memq (process-status p) (quote (run open)))) 
(tramp-get-buffer vec) (when (and (boundp (quote non-essential)) (symbol-value 
(quote non-essential))) (throw (quote non-essential) (quote non-essential))) 
(tramp-with-progress-reporter vec 3 (if (zerop (length ...)) (format "Opening 
connection for %s using %s" (tramp-file-name-host vec) (tramp-file-name-method 
vec)) (format "Opening connection for address@hidden using %s" 
(tramp-file-name-user vec) (tramp-file-name-host vec) (tramp-file-name-method 
vec))) (when (and p (processp p)) (delete-process p)) (setenv "TERM" 
tramp-terminal-type) (setenv "LC_ALL" "C") (setenv "PROMPT_COMMAND") (setenv 
"PS1" tramp-initial-end-of-output) (let* ((target-alist ...) 
(process-connection-type tramp-process-connection-type) 
(process-adaptive-read-buffering nil) (coding-system-for-read nil) (p ...)) 
(tramp-set-connection-property p "vector" vec) (set-process-sentinel p (quote 
tramp-process-sentinel)) (tramp-compat-set-process-query-on-exit-flag p nil) 
(setq tramp-current-connection (cons ... ...)) (tramp-message vec 6 "%s" 
(mapconcat ... ... " ")) (tramp-barf-if-no-shell-prompt p 60 "Couldn't find 
local shell prompt %s" tramp-encoding-shell) (while target-alist (let* ... ... 
... ... ... ... ... ... ... ...) (setq target-alist ...)) 
(tramp-open-connection-setup-interactive-shell p vec)))) (quit (tramp-cleanup 
vec) (signal (car err) (cdr err))))))
  tramp-maybe-open-connection(["scpc" nil "io.local" 
"/private/tmp/emacs-mac-mrNX/" nil])
  (if neveropen nil (tramp-maybe-open-connection vec))
  (unless neveropen (tramp-maybe-open-connection vec))
  tramp-send-command(["scpc" nil "io.local" "/private/tmp/emacs-mac-mrNX/" nil] 
"echo \\\"`getconf PATH 2>/dev/null`\\\" 2>/dev/null; echo tramp_exit_status 
$?")
  tramp-send-command-and-check(["scpc" nil "io.local" 
"/private/tmp/emacs-mac-mrNX/" nil] "echo \\\"`getconf PATH 2>/dev/null`\\\"")
  (if noerror (tramp-send-command-and-check vec command) 
(tramp-barf-unless-okay vec command "`%s' returns with error" command))
  (if (if noerror (tramp-send-command-and-check vec command) 
(tramp-barf-unless-okay vec command "`%s' returns with error" command)) (progn 
(with-current-buffer (tramp-get-connection-buffer vec) (goto-char (point-min)) 
(condition-case nil (prog1 (read (current-buffer)) (when (re-search-forward 
"\\S-" (point-at-eol) t) (error nil))) (error (unless noerror (tramp-error vec 
(quote file-error) "`%s' does not return a valid Lisp expression: `%s'" command 
(buffer-string))))))))
  (when (if noerror (tramp-send-command-and-check vec command) 
(tramp-barf-unless-okay vec command "`%s' returns with error" command)) 
(with-current-buffer (tramp-get-connection-buffer vec) (goto-char (point-min)) 
(condition-case nil (prog1 (read (current-buffer)) (when (re-search-forward 
"\\S-" (point-at-eol) t) (error nil))) (error (unless noerror (tramp-error vec 
(quote file-error) "`%s' does not return a valid Lisp expression: `%s'" command 
(buffer-string)))))))
  tramp-send-command-and-read(["scpc" nil "io.local" 
"/private/tmp/emacs-mac-mrNX/" nil] "echo \\\"`getconf PATH 2>/dev/null`\\\"" 
noerror)
  (or (tramp-send-command-and-read vec "echo \\\"`getconf PATH 
2>/dev/null`\\\"" (quote noerror)) (progn (tramp-message vec 3 "`getconf PATH' 
not successful, using default value \"%s\"." "/bin:/usr/bin") "/bin:/usr/bin"))
  (progn (or (tramp-send-command-and-read vec "echo \\\"`getconf PATH 
2>/dev/null`\\\"" (quote noerror)) (progn (tramp-message vec 3 "`getconf PATH' 
not successful, using default value \"%s\"." "/bin:/usr/bin") "/bin:/usr/bin")))
  (if elt1 (progn (or (tramp-send-command-and-read vec "echo \\\"`getconf PATH 
2>/dev/null`\\\"" (quote noerror)) (progn (tramp-message vec 3 "`getconf PATH' 
not successful, using default value \"%s\"." "/bin:/usr/bin") 
"/bin:/usr/bin"))))
  (when elt1 (or (tramp-send-command-and-read vec "echo \\\"`getconf PATH 
2>/dev/null`\\\"" (quote noerror)) (progn (tramp-message vec 3 "`getconf PATH' 
not successful, using default value \"%s\"." "/bin:/usr/bin") "/bin:/usr/bin")))
  (let* ((remote-path (copy-tree tramp-remote-path)) (elt1 (memq (quote 
tramp-default-remote-path) remote-path)) (elt2 (memq (quote 
tramp-own-remote-path) remote-path)) (default-remote-path (when elt1 (or 
(tramp-send-command-and-read vec "echo \\\"`getconf PATH 2>/dev/null`\\\"" 
(quote noerror)) (progn (tramp-message vec 3 "`getconf PATH' not successful, 
using default value \"%s\"." "/bin:/usr/bin") "/bin:/usr/bin")))) 
(own-remote-path (when elt2 (condition-case nil (tramp-send-command-and-read 
vec "echo \\\"$PATH\\\"") (error (tramp-message vec 3 "$PATH not set, ignoring 
`tramp-own-remote-path'.") nil))))) (when elt1 (setcdr elt1 (append 
(tramp-compat-split-string default-remote-path ":") (cdr elt1))) (setq 
remote-path (delq (quote tramp-default-remote-path) remote-path))) (when elt2 
(setcdr elt2 (append (tramp-compat-split-string own-remote-path ":") (cdr 
elt2))) (setq remote-path (delq (quote tramp-own-remote-path) remote-path))) 
(setq elt1 remote-path) (while (consp elt1) (while (and (car elt1) (setq elt2 
(member (car elt1) (cdr elt1)))) (setcar elt2 nil)) (setq elt1 (cdr elt1))) 
(delq nil (mapcar (lambda (x) (and (stringp x) (file-directory-p 
(tramp-make-tramp-file-name (tramp-file-name-method vec) (tramp-file-name-user 
vec) (tramp-file-name-host vec) x)) x)) remote-path)))
  (progn (let* ((remote-path (copy-tree tramp-remote-path)) (elt1 (memq (quote 
tramp-default-remote-path) remote-path)) (elt2 (memq (quote 
tramp-own-remote-path) remote-path)) (default-remote-path (when elt1 (or 
(tramp-send-command-and-read vec "echo \\\"`getconf PATH 2>/dev/null`\\\"" 
(quote noerror)) (progn (tramp-message vec 3 "`getconf PATH' not successful, 
using default value \"%s\"." "/bin:/usr/bin") "/bin:/usr/bin")))) 
(own-remote-path (when elt2 (condition-case nil (tramp-send-command-and-read 
vec "echo \\\"$PATH\\\"") (error (tramp-message vec 3 "$PATH not set, ignoring 
`tramp-own-remote-path'.") nil))))) (when elt1 (setcdr elt1 (append 
(tramp-compat-split-string default-remote-path ":") (cdr elt1))) (setq 
remote-path (delq (quote tramp-default-remote-path) remote-path))) (when elt2 
(setcdr elt2 (append (tramp-compat-split-string own-remote-path ":") (cdr 
elt2))) (setq remote-path (delq (quote tramp-own-remote-path) remote-path))) 
(setq elt1 remote-path) (while (consp elt1) (while (and (car elt1) (setq elt2 
(member (car elt1) (cdr elt1)))) (setcar elt2 nil)) (setq elt1 (cdr elt1))) 
(delq nil (mapcar (lambda (x) (and (stringp x) (file-directory-p 
(tramp-make-tramp-file-name ... ... ... x)) x)) remote-path))))
  (setq value (progn (let* ((remote-path (copy-tree tramp-remote-path)) (elt1 
(memq (quote tramp-default-remote-path) remote-path)) (elt2 (memq (quote 
tramp-own-remote-path) remote-path)) (default-remote-path (when elt1 (or 
(tramp-send-command-and-read vec "echo \\\"`getconf PATH 2>/dev/null`\\\"" ...) 
(progn ... "/bin:/usr/bin")))) (own-remote-path (when elt2 (condition-case nil 
(tramp-send-command-and-read vec "echo \\\"$PATH\\\"") (error ... nil))))) 
(when elt1 (setcdr elt1 (append (tramp-compat-split-string default-remote-path 
":") (cdr elt1))) (setq remote-path (delq (quote tramp-default-remote-path) 
remote-path))) (when elt2 (setcdr elt2 (append (tramp-compat-split-string 
own-remote-path ":") (cdr elt2))) (setq remote-path (delq (quote 
tramp-own-remote-path) remote-path))) (setq elt1 remote-path) (while (consp 
elt1) (while (and (car elt1) (setq elt2 (member ... ...))) (setcar elt2 nil)) 
(setq elt1 (cdr elt1))) (delq nil (mapcar (lambda (x) (and (stringp x) 
(file-directory-p ...) x)) remote-path)))))
  (progn (setq value (progn (let* ((remote-path (copy-tree tramp-remote-path)) 
(elt1 (memq (quote tramp-default-remote-path) remote-path)) (elt2 (memq (quote 
tramp-own-remote-path) remote-path)) (default-remote-path (when elt1 (or ... 
...))) (own-remote-path (when elt2 (condition-case nil ... ...)))) (when elt1 
(setcdr elt1 (append (tramp-compat-split-string default-remote-path ":") (cdr 
elt1))) (setq remote-path (delq (quote tramp-default-remote-path) 
remote-path))) (when elt2 (setcdr elt2 (append (tramp-compat-split-string 
own-remote-path ":") (cdr elt2))) (setq remote-path (delq (quote 
tramp-own-remote-path) remote-path))) (setq elt1 remote-path) (while (consp 
elt1) (while (and (car elt1) (setq elt2 ...)) (setcar elt2 nil)) (setq elt1 
(cdr elt1))) (delq nil (mapcar (lambda (x) (and ... ... x)) remote-path))))) 
(tramp-set-connection-property (if (memq (quote tramp-own-remote-path) 
tramp-remote-path) (tramp-get-connection-process vec) vec) "remote-path" value))
  (if (eq value (quote undef)) (progn (setq value (progn (let* ((remote-path 
(copy-tree tramp-remote-path)) (elt1 (memq ... remote-path)) (elt2 (memq ... 
remote-path)) (default-remote-path (when elt1 ...)) (own-remote-path (when elt2 
...))) (when elt1 (setcdr elt1 (append ... ...)) (setq remote-path (delq ... 
remote-path))) (when elt2 (setcdr elt2 (append ... ...)) (setq remote-path 
(delq ... remote-path))) (setq elt1 remote-path) (while (consp elt1) (while 
(and ... ...) (setcar elt2 nil)) (setq elt1 (cdr elt1))) (delq nil (mapcar 
(lambda ... ...) remote-path))))) (tramp-set-connection-property (if (memq 
(quote tramp-own-remote-path) tramp-remote-path) (tramp-get-connection-process 
vec) vec) "remote-path" value)))
  (when (eq value (quote undef)) (setq value (progn (let* ((remote-path 
(copy-tree tramp-remote-path)) (elt1 (memq (quote tramp-default-remote-path) 
remote-path)) (elt2 (memq (quote tramp-own-remote-path) remote-path)) 
(default-remote-path (when elt1 (or ... ...))) (own-remote-path (when elt2 
(condition-case nil ... ...)))) (when elt1 (setcdr elt1 (append 
(tramp-compat-split-string default-remote-path ":") (cdr elt1))) (setq 
remote-path (delq (quote tramp-default-remote-path) remote-path))) (when elt2 
(setcdr elt2 (append (tramp-compat-split-string own-remote-path ":") (cdr 
elt2))) (setq remote-path (delq (quote tramp-own-remote-path) remote-path))) 
(setq elt1 remote-path) (while (consp elt1) (while (and (car elt1) (setq elt2 
...)) (setcar elt2 nil)) (setq elt1 (cdr elt1))) (delq nil (mapcar (lambda (x) 
(and ... ... x)) remote-path))))) (tramp-set-connection-property (if (memq 
(quote tramp-own-remote-path) tramp-remote-path) (tramp-get-connection-process 
vec) vec) "remote-path" value))
  (let ((value (tramp-get-connection-property (if (memq (quote 
tramp-own-remote-path) tramp-remote-path) (tramp-get-connection-process vec) 
vec) "remote-path" (quote undef)))) (when (eq value (quote undef)) (setq value 
(progn (let* ((remote-path (copy-tree tramp-remote-path)) (elt1 (memq ... 
remote-path)) (elt2 (memq ... remote-path)) (default-remote-path (when elt1 
...)) (own-remote-path (when elt2 ...))) (when elt1 (setcdr elt1 (append ... 
...)) (setq remote-path (delq ... remote-path))) (when elt2 (setcdr elt2 
(append ... ...)) (setq remote-path (delq ... remote-path))) (setq elt1 
remote-path) (while (consp elt1) (while (and ... ...) (setcar elt2 nil)) (setq 
elt1 (cdr elt1))) (delq nil (mapcar (lambda ... ...) remote-path))))) 
(tramp-set-connection-property (if (memq (quote tramp-own-remote-path) 
tramp-remote-path) (tramp-get-connection-process vec) vec) "remote-path" 
value)) value)
  (with-connection-property (if (memq (quote tramp-own-remote-path) 
tramp-remote-path) (tramp-get-connection-process vec) vec) "remote-path" (let* 
((remote-path (copy-tree tramp-remote-path)) (elt1 (memq (quote 
tramp-default-remote-path) remote-path)) (elt2 (memq (quote 
tramp-own-remote-path) remote-path)) (default-remote-path (when elt1 (or 
(tramp-send-command-and-read vec "echo \\\"`getconf PATH 2>/dev/null`\\\"" 
(quote noerror)) (progn (tramp-message vec 3 "`getconf PATH' not successful, 
using default value \"%s\"." "/bin:/usr/bin") "/bin:/usr/bin")))) 
(own-remote-path (when elt2 (condition-case nil (tramp-send-command-and-read 
vec "echo \\\"$PATH\\\"") (error (tramp-message vec 3 "$PATH not set, ignoring 
`tramp-own-remote-path'.") nil))))) (when elt1 (setcdr elt1 (append 
(tramp-compat-split-string default-remote-path ":") (cdr elt1))) (setq 
remote-path (delq (quote tramp-default-remote-path) remote-path))) (when elt2 
(setcdr elt2 (append (tramp-compat-split-string own-remote-path ":") (cdr 
elt2))) (setq remote-path (delq (quote tramp-own-remote-path) remote-path))) 
(setq elt1 remote-path) (while (consp elt1) (while (and (car elt1) (setq elt2 
(member (car elt1) (cdr elt1)))) (setcar elt2 nil)) (setq elt1 (cdr elt1))) 
(delq nil (mapcar (lambda (x) (and (stringp x) (file-directory-p 
(tramp-make-tramp-file-name ... ... ... x)) x)) remote-path))))
  tramp-get-remote-path(["scpc" nil "io.local" "/private/tmp/emacs-mac-mrNX/" 
nil])
  (tramp-find-executable vec "readlink" (tramp-get-remote-path vec))
  (let ((result (tramp-find-executable vec "readlink" (tramp-get-remote-path 
vec)))) (when (and result (tramp-send-command-and-check vec (format "%s 
--canonicalize-missing /" result))) result))
  (progn (tramp-message vec 5 "Finding a suitable `readlink' command") (let 
((result (tramp-find-executable vec "readlink" (tramp-get-remote-path vec)))) 
(when (and result (tramp-send-command-and-check vec (format "%s 
--canonicalize-missing /" result))) result)))
  (setq value (progn (tramp-message vec 5 "Finding a suitable `readlink' 
command") (let ((result (tramp-find-executable vec "readlink" 
(tramp-get-remote-path vec)))) (when (and result (tramp-send-command-and-check 
vec (format "%s --canonicalize-missing /" result))) result))))
  (progn (setq value (progn (tramp-message vec 5 "Finding a suitable `readlink' 
command") (let ((result (tramp-find-executable vec "readlink" 
(tramp-get-remote-path vec)))) (when (and result (tramp-send-command-and-check 
vec (format "%s --canonicalize-missing /" result))) result)))) 
(tramp-set-connection-property vec "readlink" value))
  (if (eq value (quote undef)) (progn (setq value (progn (tramp-message vec 5 
"Finding a suitable `readlink' command") (let ((result (tramp-find-executable 
vec "readlink" ...))) (when (and result (tramp-send-command-and-check vec ...)) 
result)))) (tramp-set-connection-property vec "readlink" value)))
  (when (eq value (quote undef)) (setq value (progn (tramp-message vec 5 
"Finding a suitable `readlink' command") (let ((result (tramp-find-executable 
vec "readlink" (tramp-get-remote-path vec)))) (when (and result 
(tramp-send-command-and-check vec (format "%s --canonicalize-missing /" 
result))) result)))) (tramp-set-connection-property vec "readlink" value))
  (let ((value (tramp-get-connection-property vec "readlink" (quote undef)))) 
(when (eq value (quote undef)) (setq value (progn (tramp-message vec 5 "Finding 
a suitable `readlink' command") (let ((result (tramp-find-executable vec 
"readlink" ...))) (when (and result (tramp-send-command-and-check vec ...)) 
result)))) (tramp-set-connection-property vec "readlink" value)) value)
  (with-connection-property vec "readlink" (tramp-message vec 5 "Finding a 
suitable `readlink' command") (let ((result (tramp-find-executable vec 
"readlink" (tramp-get-remote-path vec)))) (when (and result 
(tramp-send-command-and-check vec (format "%s --canonicalize-missing /" 
result))) result)))
  tramp-get-remote-readlink(["scpc" nil "io.local" 
"/private/tmp/emacs-mac-mrNX/" nil])
  (cond ((tramp-get-remote-readlink v) (setq result 
(tramp-send-command-and-read v (format "echo \"\\\"`%s --canonicalize-missing 
%s`\\\"\"" (tramp-get-remote-readlink v) (tramp-shell-quote-argument 
localname))))) ((and (tramp-get-remote-perl v) (tramp-get-connection-property v 
"perl-file-spec" nil) (tramp-get-connection-property v "perl-cwd-realpath" 
nil)) (tramp-maybe-send-script v tramp-perl-file-truename 
"tramp_perl_file_truename") (setq result (tramp-send-command-and-read v (format 
"tramp_perl_file_truename %s" (tramp-shell-quote-argument localname))))) (t 
(let* ((directory-sep-char 47) (steps (tramp-compat-split-string localname 
"/")) (localnamedir (tramp-run-real-handler (quote file-name-as-directory) 
(list localname))) (is-dir (string= localname localnamedir)) (thisstep nil) 
(numchase 0) (numchase-limit 20) symlink-target) (while (and steps (< numchase 
numchase-limit)) (setq thisstep (pop steps)) (tramp-message v 5 "Check %s" 
(mapconcat (quote identity) (append (quote ...) (reverse result) (list 
thisstep)) "/")) (setq symlink-target (nth 0 (file-attributes 
(tramp-make-tramp-file-name method user host ...)))) (cond ((string= "." 
thisstep) (tramp-message v 5 "Ignoring step `.'")) ((string= ".." thisstep) 
(tramp-message v 5 "Processing step `..'") (pop result)) ((stringp 
symlink-target) (tramp-message v 5 "Follow symlink to %s" symlink-target) (setq 
numchase (1+ numchase)) (when (file-name-absolute-p symlink-target) (setq 
result nil)) (when (tramp-tramp-file-p symlink-target) (unless ... ...) (setq 
symlink-target localname)) (setq steps (append ... steps))) (t (setq result 
(cons thisstep result))))) (when (>= numchase numchase-limit) (tramp-error v 
(quote file-error) "Maximum number (%d) of symlinks exceeded" numchase-limit)) 
(setq result (reverse result)) (setq result (if result (mapconcat (quote 
identity) (cons "" result) "/") "/")) (when (and is-dir (or (string= "" result) 
(not (string= ... "/")))) (setq result (concat result "/"))))))
  (let ((result nil)) (tramp-message v 4 "Finding true name for `%s'" filename) 
(cond ((tramp-get-remote-readlink v) (setq result (tramp-send-command-and-read 
v (format "echo \"\\\"`%s --canonicalize-missing %s`\\\"\"" 
(tramp-get-remote-readlink v) (tramp-shell-quote-argument localname))))) ((and 
(tramp-get-remote-perl v) (tramp-get-connection-property v "perl-file-spec" 
nil) (tramp-get-connection-property v "perl-cwd-realpath" nil)) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result (tramp-send-command-and-read v (format "tramp_perl_file_truename 
%s" (tramp-shell-quote-argument localname))))) (t (let* ((directory-sep-char 
47) (steps (tramp-compat-split-string localname "/")) (localnamedir 
(tramp-run-real-handler (quote file-name-as-directory) (list localname))) 
(is-dir (string= localname localnamedir)) (thisstep nil) (numchase 0) 
(numchase-limit 20) symlink-target) (while (and steps (< numchase 
numchase-limit)) (setq thisstep (pop steps)) (tramp-message v 5 "Check %s" 
(mapconcat (quote identity) (append ... ... ...) "/")) (setq symlink-target 
(nth 0 (file-attributes ...))) (cond ((string= "." thisstep) (tramp-message v 5 
"Ignoring step `.'")) ((string= ".." thisstep) (tramp-message v 5 "Processing 
step `..'") (pop result)) ((stringp symlink-target) (tramp-message v 5 "Follow 
symlink to %s" symlink-target) (setq numchase ...) (when ... ...) (when ... ... 
...) (setq steps ...)) (t (setq result ...)))) (when (>= numchase 
numchase-limit) (tramp-error v (quote file-error) "Maximum number (%d) of 
symlinks exceeded" numchase-limit)) (setq result (reverse result)) (setq result 
(if result (mapconcat (quote identity) (cons "" result) "/") "/")) (when (and 
is-dir (or (string= "" result) (not ...))) (setq result (concat result 
"/")))))) (tramp-message v 4 "True name of `%s' is `%s'" localname result) 
result)
  (progn (let ((result nil)) (tramp-message v 4 "Finding true name for `%s'" 
filename) (cond ((tramp-get-remote-readlink v) (setq result 
(tramp-send-command-and-read v (format "echo \"\\\"`%s --canonicalize-missing 
%s`\\\"\"" (tramp-get-remote-readlink v) (tramp-shell-quote-argument 
localname))))) ((and (tramp-get-remote-perl v) (tramp-get-connection-property v 
"perl-file-spec" nil) (tramp-get-connection-property v "perl-cwd-realpath" 
nil)) (tramp-maybe-send-script v tramp-perl-file-truename 
"tramp_perl_file_truename") (setq result (tramp-send-command-and-read v (format 
"tramp_perl_file_truename %s" (tramp-shell-quote-argument localname))))) (t 
(let* ((directory-sep-char 47) (steps (tramp-compat-split-string localname 
"/")) (localnamedir (tramp-run-real-handler ... ...)) (is-dir (string= 
localname localnamedir)) (thisstep nil) (numchase 0) (numchase-limit 20) 
symlink-target) (while (and steps (< numchase numchase-limit)) (setq thisstep 
(pop steps)) (tramp-message v 5 "Check %s" (mapconcat ... ... "/")) (setq 
symlink-target (nth 0 ...)) (cond (... ...) (... ... ...) (... ... ... ... ... 
...) (t ...))) (when (>= numchase numchase-limit) (tramp-error v (quote 
file-error) "Maximum number (%d) of symlinks exceeded" numchase-limit)) (setq 
result (reverse result)) (setq result (if result (mapconcat ... ... "/") "/")) 
(when (and is-dir (or ... ...)) (setq result (concat result "/")))))) 
(tramp-message v 4 "True name of `%s' is `%s'" localname result) result))
  (setq value (progn (let ((result nil)) (tramp-message v 4 "Finding true name 
for `%s'" filename) (cond ((tramp-get-remote-readlink v) (setq result 
(tramp-send-command-and-read v (format "echo \"\\\"`%s --canonicalize-missing 
%s`\\\"\"" ... ...)))) ((and (tramp-get-remote-perl v) 
(tramp-get-connection-property v "perl-file-spec" nil) 
(tramp-get-connection-property v "perl-cwd-realpath" nil)) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result (tramp-send-command-and-read v (format "tramp_perl_file_truename 
%s" ...)))) (t (let* ((directory-sep-char 47) (steps ...) (localnamedir ...) 
(is-dir ...) (thisstep nil) (numchase 0) (numchase-limit 20) symlink-target) 
(while (and steps ...) (setq thisstep ...) (tramp-message v 5 "Check %s" ...) 
(setq symlink-target ...) (cond ... ... ... ...)) (when (>= numchase 
numchase-limit) (tramp-error v ... "Maximum number (%d) of symlinks exceeded" 
numchase-limit)) (setq result (reverse result)) (setq result (if result ... 
"/")) (when (and is-dir ...) (setq result ...))))) (tramp-message v 4 "True 
name of `%s' is `%s'" localname result) result)))
  (progn (setq value (progn (let ((result nil)) (tramp-message v 4 "Finding 
true name for `%s'" filename) (cond ((tramp-get-remote-readlink v) (setq result 
(tramp-send-command-and-read v ...))) ((and (tramp-get-remote-perl v) 
(tramp-get-connection-property v "perl-file-spec" nil) 
(tramp-get-connection-property v "perl-cwd-realpath" nil)) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result (tramp-send-command-and-read v ...))) (t (let* (... ... ... ... 
... ... ... symlink-target) (while ... ... ... ... ...) (when ... ...) (setq 
result ...) (setq result ...) (when ... ...)))) (tramp-message v 4 "True name 
of `%s' is `%s'" localname result) result))) (tramp-set-file-property v 
localname "file-truename" value))
  (if (eq value (quote undef)) (progn (setq value (progn (let ((result nil)) 
(tramp-message v 4 "Finding true name for `%s'" filename) (cond 
((tramp-get-remote-readlink v) (setq result ...)) ((and ... ... ...) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result ...)) (t (let* ... ... ... ... ... ...))) (tramp-message v 4 "True 
name of `%s' is `%s'" localname result) result))) (tramp-set-file-property v 
localname "file-truename" value)))
  (when (eq value (quote undef)) (setq value (progn (let ((result nil)) 
(tramp-message v 4 "Finding true name for `%s'" filename) (cond 
((tramp-get-remote-readlink v) (setq result (tramp-send-command-and-read v 
...))) ((and (tramp-get-remote-perl v) (tramp-get-connection-property v 
"perl-file-spec" nil) (tramp-get-connection-property v "perl-cwd-realpath" 
nil)) (tramp-maybe-send-script v tramp-perl-file-truename 
"tramp_perl_file_truename") (setq result (tramp-send-command-and-read v ...))) 
(t (let* (... ... ... ... ... ... ... symlink-target) (while ... ... ... ... 
...) (when ... ...) (setq result ...) (setq result ...) (when ... ...)))) 
(tramp-message v 4 "True name of `%s' is `%s'" localname result) result))) 
(tramp-set-file-property v localname "file-truename" value))
  (let ((value (tramp-get-file-property v localname "file-truename" (quote 
undef)))) (when (eq value (quote undef)) (setq value (progn (let ((result nil)) 
(tramp-message v 4 "Finding true name for `%s'" filename) (cond 
((tramp-get-remote-readlink v) (setq result ...)) ((and ... ... ...) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result ...)) (t (let* ... ... ... ... ... ...))) (tramp-message v 4 "True 
name of `%s' is `%s'" localname result) result))) (tramp-set-file-property v 
localname "file-truename" value)) value)
  (if (file-name-absolute-p localname) (let ((value (tramp-get-file-property v 
localname "file-truename" (quote undef)))) (when (eq value (quote undef)) (setq 
value (progn (let ((result nil)) (tramp-message v 4 "Finding true name for 
`%s'" filename) (cond (... ...) (... ... ...) (t ...)) (tramp-message v 4 "True 
name of `%s' is `%s'" localname result) result))) (tramp-set-file-property v 
localname "file-truename" value)) value) (let ((result nil)) (tramp-message v 4 
"Finding true name for `%s'" filename) (cond ((tramp-get-remote-readlink v) 
(setq result (tramp-send-command-and-read v (format "echo \"\\\"`%s 
--canonicalize-missing %s`\\\"\"" (tramp-get-remote-readlink v) 
(tramp-shell-quote-argument localname))))) ((and (tramp-get-remote-perl v) 
(tramp-get-connection-property v "perl-file-spec" nil) 
(tramp-get-connection-property v "perl-cwd-realpath" nil)) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result (tramp-send-command-and-read v (format "tramp_perl_file_truename 
%s" (tramp-shell-quote-argument localname))))) (t (let* ((directory-sep-char 
47) (steps (tramp-compat-split-string localname "/")) (localnamedir 
(tramp-run-real-handler ... ...)) (is-dir (string= localname localnamedir)) 
(thisstep nil) (numchase 0) (numchase-limit 20) symlink-target) (while (and 
steps (< numchase numchase-limit)) (setq thisstep (pop steps)) (tramp-message v 
5 "Check %s" (mapconcat ... ... "/")) (setq symlink-target (nth 0 ...)) (cond 
(... ...) (... ... ...) (... ... ... ... ... ...) (t ...))) (when (>= numchase 
numchase-limit) (tramp-error v (quote file-error) "Maximum number (%d) of 
symlinks exceeded" numchase-limit)) (setq result (reverse result)) (setq result 
(if result (mapconcat ... ... "/") "/")) (when (and is-dir (or ... ...)) (setq 
result (concat result "/")))))) (tramp-message v 4 "True name of `%s' is `%s'" 
localname result) result))
  (with-file-property v localname "file-truename" (let ((result nil)) 
(tramp-message v 4 "Finding true name for `%s'" filename) (cond 
((tramp-get-remote-readlink v) (setq result (tramp-send-command-and-read v 
(format "echo \"\\\"`%s --canonicalize-missing %s`\\\"\"" 
(tramp-get-remote-readlink v) (tramp-shell-quote-argument localname))))) ((and 
(tramp-get-remote-perl v) (tramp-get-connection-property v "perl-file-spec" 
nil) (tramp-get-connection-property v "perl-cwd-realpath" nil)) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result (tramp-send-command-and-read v (format "tramp_perl_file_truename 
%s" (tramp-shell-quote-argument localname))))) (t (let* ((directory-sep-char 
47) (steps (tramp-compat-split-string localname "/")) (localnamedir 
(tramp-run-real-handler ... ...)) (is-dir (string= localname localnamedir)) 
(thisstep nil) (numchase 0) (numchase-limit 20) symlink-target) (while (and 
steps (< numchase numchase-limit)) (setq thisstep (pop steps)) (tramp-message v 
5 "Check %s" (mapconcat ... ... "/")) (setq symlink-target (nth 0 ...)) (cond 
(... ...) (... ... ...) (... ... ... ... ... ...) (t ...))) (when (>= numchase 
numchase-limit) (tramp-error v (quote file-error) "Maximum number (%d) of 
symlinks exceeded" numchase-limit)) (setq result (reverse result)) (setq result 
(if result (mapconcat ... ... "/") "/")) (when (and is-dir (or ... ...)) (setq 
result (concat result "/")))))) (tramp-message v 4 "True name of `%s' is `%s'" 
localname result) result))
  (tramp-make-tramp-file-name method user host (with-file-property v localname 
"file-truename" (let ((result nil)) (tramp-message v 4 "Finding true name for 
`%s'" filename) (cond ((tramp-get-remote-readlink v) (setq result 
(tramp-send-command-and-read v (format "echo \"\\\"`%s --canonicalize-missing 
%s`\\\"\"" ... ...)))) ((and (tramp-get-remote-perl v) 
(tramp-get-connection-property v "perl-file-spec" nil) 
(tramp-get-connection-property v "perl-cwd-realpath" nil)) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result (tramp-send-command-and-read v (format "tramp_perl_file_truename 
%s" ...)))) (t (let* ((directory-sep-char 47) (steps ...) (localnamedir ...) 
(is-dir ...) (thisstep nil) (numchase 0) (numchase-limit 20) symlink-target) 
(while (and steps ...) (setq thisstep ...) (tramp-message v 5 "Check %s" ...) 
(setq symlink-target ...) (cond ... ... ... ...)) (when (>= numchase 
numchase-limit) (tramp-error v ... "Maximum number (%d) of symlinks exceeded" 
numchase-limit)) (setq result (reverse result)) (setq result (if result ... 
"/")) (when (and is-dir ...) (setq result ...))))) (tramp-message v 4 "True 
name of `%s' is `%s'" localname result) result)))
  (let* ((v (tramp-dissect-file-name (expand-file-name filename))) (method 
(tramp-file-name-method v)) (user (tramp-file-name-user v)) (host 
(tramp-file-name-host v)) (localname (tramp-file-name-localname v)) (hop 
(tramp-file-name-hop v))) (tramp-make-tramp-file-name method user host 
(with-file-property v localname "file-truename" (let ((result nil)) 
(tramp-message v 4 "Finding true name for `%s'" filename) (cond 
((tramp-get-remote-readlink v) (setq result (tramp-send-command-and-read v 
...))) ((and (tramp-get-remote-perl v) (tramp-get-connection-property v 
"perl-file-spec" nil) (tramp-get-connection-property v "perl-cwd-realpath" 
nil)) (tramp-maybe-send-script v tramp-perl-file-truename 
"tramp_perl_file_truename") (setq result (tramp-send-command-and-read v ...))) 
(t (let* (... ... ... ... ... ... ... symlink-target) (while ... ... ... ... 
...) (when ... ...) (setq result ...) (setq result ...) (when ... ...)))) 
(tramp-message v 4 "True name of `%s' is `%s'" localname result) result))))
  (with-parsed-tramp-file-name (expand-file-name filename) nil 
(tramp-make-tramp-file-name method user host (with-file-property v localname 
"file-truename" (let ((result nil)) (tramp-message v 4 "Finding true name for 
`%s'" filename) (cond ((tramp-get-remote-readlink v) (setq result 
(tramp-send-command-and-read v ...))) ((and (tramp-get-remote-perl v) 
(tramp-get-connection-property v "perl-file-spec" nil) 
(tramp-get-connection-property v "perl-cwd-realpath" nil)) 
(tramp-maybe-send-script v tramp-perl-file-truename "tramp_perl_file_truename") 
(setq result (tramp-send-command-and-read v ...))) (t (let* (... ... ... ... 
... ... ... symlink-target) (while ... ... ... ... ...) (when ... ...) (setq 
result ...) (setq result ...) (when ... ...)))) (tramp-message v 4 "True name 
of `%s' is `%s'" localname result) result))))
  tramp-sh-handle-file-truename("/scpc:io.local:/private/tmp/emacs-mac-mrNX/")
  apply(tramp-sh-handle-file-truename 
"/scpc:io.local:/private/tmp/emacs-mac-mrNX/")
  (if fn (apply (cdr fn) args) (tramp-run-real-handler operation args))
  (let ((fn (assoc operation tramp-sh-file-name-handler-alist))) (if fn (apply 
(cdr fn) args) (tramp-run-real-handler operation args)))
  (progn (let ((fn (assoc operation tramp-sh-file-name-handler-alist))) (if fn 
(apply (cdr fn) args) (tramp-run-real-handler operation args))))
  (unwind-protect (progn (let ((fn (assoc operation 
tramp-sh-file-name-handler-alist))) (if fn (apply (cdr fn) args) 
(tramp-run-real-handler operation args)))) (set-match-data 
save-match-data-internal (quote evaporate)))
  (let ((save-match-data-internal (match-data))) (unwind-protect (progn (let 
((fn (assoc operation tramp-sh-file-name-handler-alist))) (if fn (apply (cdr 
fn) args) (tramp-run-real-handler operation args)))) (set-match-data 
save-match-data-internal (quote evaporate))))
  (save-match-data (let ((fn (assoc operation 
tramp-sh-file-name-handler-alist))) (if fn (apply (cdr fn) args) 
(tramp-run-real-handler operation args))))
  (let ((tramp-locker t)) (save-match-data (let ((fn (assoc operation 
tramp-sh-file-name-handler-alist))) (if fn (apply (cdr fn) args) 
(tramp-run-real-handler operation args)))))
  (progn (setq tramp-locked t) (let ((tramp-locker t)) (save-match-data (let 
((fn (assoc operation tramp-sh-file-name-handler-alist))) (if fn (apply (cdr 
fn) args) (tramp-run-real-handler operation args))))))
  (unwind-protect (progn (setq tramp-locked t) (let ((tramp-locker t)) 
(save-match-data (let ((fn (assoc operation tramp-sh-file-name-handler-alist))) 
(if fn (apply (cdr fn) args) (tramp-run-real-handler operation args)))))) (setq 
tramp-locked tl))
  (let ((tl tramp-locked)) (unwind-protect (progn (setq tramp-locked t) (let 
((tramp-locker t)) (save-match-data (let ((fn ...)) (if fn (apply ... args) 
(tramp-run-real-handler operation args)))))) (setq tramp-locked tl)))
  tramp-sh-file-name-handler(file-truename 
"/scpc:io.local:/private/tmp/emacs-mac-mrNX/")
  apply(tramp-sh-file-name-handler file-truename 
"/scpc:io.local:/private/tmp/emacs-mac-mrNX/")
  (catch (quote suppress) (apply foreign operation args))
  (catch (quote non-essential) (catch (quote suppress) (apply foreign operation 
args)))
  (setq result (catch (quote non-essential) (catch (quote suppress) (apply 
foreign operation args))))
  (let ((sf (symbol-function foreign)) result) (when (and (listp sf) (eq (car 
sf) (quote autoload))) (let ((default-directory 
(tramp-compat-temporary-file-directory))) (load (cadr sf) (quote noerror) 
(quote nomessage)))) (setq result (catch (quote non-essential) (catch (quote 
suppress) (apply foreign operation args)))) (cond ((eq result (quote 
non-essential)) (tramp-message v 5 "Non-essential received in operation %s" 
(append (list operation) args)) (tramp-run-real-handler operation args)) ((eq 
result (quote suppress)) (let (tramp-message-show-message) (tramp-message v 1 
"Suppress received in operation %s" (append (list operation) args)) 
(tramp-cleanup v) (tramp-run-real-handler operation args))) (t result)))
  (lambda nil (let ((sf (symbol-function foreign)) result) (when (and (listp 
sf) (eq (car sf) (quote autoload))) (let ((default-directory 
(tramp-compat-temporary-file-directory))) (load (cadr sf) (quote noerror) 
(quote nomessage)))) (setq result (catch (quote non-essential) (catch (quote 
suppress) (apply foreign operation args)))) (cond ((eq result (quote 
non-essential)) (tramp-message v 5 "Non-essential received in operation %s" 
(append (list operation) args)) (tramp-run-real-handler operation args)) ((eq 
result (quote suppress)) (let (tramp-message-show-message) (tramp-message v 1 
"Suppress received in operation %s" (append (list operation) args)) 
(tramp-cleanup v) (tramp-run-real-handler operation args))) (t result))))()
  funcall((lambda nil (let ((sf (symbol-function foreign)) result) (when (and 
(listp sf) (eq (car sf) (quote autoload))) (let ((default-directory 
(tramp-compat-temporary-file-directory))) (load (cadr sf) (quote noerror) 
(quote nomessage)))) (setq result (catch (quote non-essential) (catch (quote 
suppress) (apply foreign operation args)))) (cond ((eq result (quote 
non-essential)) (tramp-message v 5 "Non-essential received in operation %s" 
(append (list operation) args)) (tramp-run-real-handler operation args)) ((eq 
result (quote suppress)) (let (tramp-message-show-message) (tramp-message v 1 
"Suppress received in operation %s" (append (list operation) args)) 
(tramp-cleanup v) (tramp-run-real-handler operation args))) (t result)))))
  (condition-case err (funcall body) ((debug quit) (let 
(tramp-message-show-message) (tramp-message v 1 "Interrupt received in 
operation %s" (append (list operation) args))) (signal (car err) (cdr err))) 
(error (cond ((and completion (zerop (length localname)) (memq operation (quote 
(file-exists-p file-directory-p)))) t) ((and completion (zerop (length 
localname)) (memq operation (quote (expand-file-name file-name-as-directory)))) 
filename) (t (signal (car err) (cdr err))))))
  (if debug-on-error (funcall body) (condition-case err (funcall body) ((debug 
quit) (let (tramp-message-show-message) (tramp-message v 1 "Interrupt received 
in operation %s" (append (list operation) args))) (signal (car err) (cdr err))) 
(error (cond ((and completion (zerop (length localname)) (memq operation (quote 
...))) t) ((and completion (zerop (length localname)) (memq operation (quote 
...))) filename) (t (signal (car err) (cdr err)))))))
  (let ((body (lambda nil (let ((sf (symbol-function foreign)) result) (when 
(and (listp sf) (eq ... ...)) (let (...) (load ... ... ...))) (setq result 
(catch (quote non-essential) (catch ... ...))) (cond ((eq result ...) 
(tramp-message v 5 "Non-essential received in operation %s" ...) 
(tramp-run-real-handler operation args)) ((eq result ...) (let ... ... ... 
...)) (t result)))))) (if debug-on-error (funcall body) (condition-case err 
(funcall body) ((debug quit) (let (tramp-message-show-message) (tramp-message v 
1 "Interrupt received in operation %s" (append (list operation) args))) (signal 
(car err) (cdr err))) (error (cond ((and completion (zerop ...) (memq operation 
...)) t) ((and completion (zerop ...) (memq operation ...)) filename) (t 
(signal (car err) (cdr err))))))))
  (tramp-compat-condition-case-unless-debug err (let ((sf (symbol-function 
foreign)) result) (when (and (listp sf) (eq (car sf) (quote autoload))) (let 
((default-directory (tramp-compat-temporary-file-directory))) (load (cadr sf) 
(quote noerror) (quote nomessage)))) (setq result (catch (quote non-essential) 
(catch (quote suppress) (apply foreign operation args)))) (cond ((eq result 
(quote non-essential)) (tramp-message v 5 "Non-essential received in operation 
%s" (append (list operation) args)) (tramp-run-real-handler operation args)) 
((eq result (quote suppress)) (let (tramp-message-show-message) (tramp-message 
v 1 "Suppress received in operation %s" (append (list operation) args)) 
(tramp-cleanup v) (tramp-run-real-handler operation args))) (t result))) 
((debug quit) (let (tramp-message-show-message) (tramp-message v 1 "Interrupt 
received in operation %s" (append (list operation) args))) (signal (car err) 
(cdr err))) (error (cond ((and completion (zerop (length localname)) (memq 
operation (quote (file-exists-p file-directory-p)))) t) ((and completion (zerop 
(length localname)) (memq operation (quote (expand-file-name 
file-name-as-directory)))) filename) (t (signal (car err) (cdr err))))))
  (if foreign (tramp-compat-condition-case-unless-debug err (let ((sf 
(symbol-function foreign)) result) (when (and (listp sf) (eq (car sf) (quote 
autoload))) (let ((default-directory (tramp-compat-temporary-file-directory))) 
(load (cadr sf) (quote noerror) (quote nomessage)))) (setq result (catch (quote 
non-essential) (catch (quote suppress) (apply foreign operation args)))) (cond 
((eq result (quote non-essential)) (tramp-message v 5 "Non-essential received 
in operation %s" (append (list operation) args)) (tramp-run-real-handler 
operation args)) ((eq result (quote suppress)) (let 
(tramp-message-show-message) (tramp-message v 1 "Suppress received in operation 
%s" (append ... args)) (tramp-cleanup v) (tramp-run-real-handler operation 
args))) (t result))) ((debug quit) (let (tramp-message-show-message) 
(tramp-message v 1 "Interrupt received in operation %s" (append (list 
operation) args))) (signal (car err) (cdr err))) (error (cond ((and completion 
(zerop (length localname)) (memq operation (quote ...))) t) ((and completion 
(zerop (length localname)) (memq operation (quote ...))) filename) (t (signal 
(car err) (cdr err)))))) (tramp-run-real-handler operation args))
  (let* ((v (tramp-dissect-file-name filename)) (method (tramp-file-name-method 
v)) (user (tramp-file-name-user v)) (host (tramp-file-name-host v)) (localname 
(tramp-file-name-localname v)) (hop (tramp-file-name-hop v))) (if foreign 
(tramp-compat-condition-case-unless-debug err (let ((sf (symbol-function 
foreign)) result) (when (and (listp sf) (eq (car sf) (quote autoload))) (let 
((default-directory ...)) (load (cadr sf) (quote noerror) (quote nomessage)))) 
(setq result (catch (quote non-essential) (catch (quote suppress) (apply 
foreign operation args)))) (cond ((eq result (quote non-essential)) 
(tramp-message v 5 "Non-essential received in operation %s" (append ... args)) 
(tramp-run-real-handler operation args)) ((eq result (quote suppress)) (let 
(tramp-message-show-message) (tramp-message v 1 "Suppress received in operation 
%s" ...) (tramp-cleanup v) (tramp-run-real-handler operation args))) (t 
result))) ((debug quit) (let (tramp-message-show-message) (tramp-message v 1 
"Interrupt received in operation %s" (append (list operation) args))) (signal 
(car err) (cdr err))) (error (cond ((and completion (zerop ...) (memq operation 
...)) t) ((and completion (zerop ...) (memq operation ...)) filename) (t 
(signal (car err) (cdr err)))))) (tramp-run-real-handler operation args)))
  (with-parsed-tramp-file-name filename nil (if foreign 
(tramp-compat-condition-case-unless-debug err (let ((sf (symbol-function 
foreign)) result) (when (and (listp sf) (eq (car sf) (quote autoload))) (let 
((default-directory ...)) (load (cadr sf) (quote noerror) (quote nomessage)))) 
(setq result (catch (quote non-essential) (catch (quote suppress) (apply 
foreign operation args)))) (cond ((eq result (quote non-essential)) 
(tramp-message v 5 "Non-essential received in operation %s" (append ... args)) 
(tramp-run-real-handler operation args)) ((eq result (quote suppress)) (let 
(tramp-message-show-message) (tramp-message v 1 "Suppress received in operation 
%s" ...) (tramp-cleanup v) (tramp-run-real-handler operation args))) (t 
result))) ((debug quit) (let (tramp-message-show-message) (tramp-message v 1 
"Interrupt received in operation %s" (append (list operation) args))) (signal 
(car err) (cdr err))) (error (cond ((and completion (zerop ...) (memq operation 
...)) t) ((and completion (zerop ...) (memq operation ...)) filename) (t 
(signal (car err) (cdr err)))))) (tramp-run-real-handler operation args)))
  (let* ((filename (tramp-replace-environment-variables (apply (quote 
tramp-file-name-for-operation) operation args))) (completion 
(tramp-completion-mode-p)) (foreign (tramp-find-foreign-file-name-handler 
filename))) (with-parsed-tramp-file-name filename nil (if foreign 
(tramp-compat-condition-case-unless-debug err (let ((sf (symbol-function 
foreign)) result) (when (and (listp sf) (eq ... ...)) (let (...) (load ... ... 
...))) (setq result (catch (quote non-essential) (catch ... ...))) (cond ((eq 
result ...) (tramp-message v 5 "Non-essential received in operation %s" ...) 
(tramp-run-real-handler operation args)) ((eq result ...) (let ... ... ... 
...)) (t result))) ((debug quit) (let (tramp-message-show-message) 
(tramp-message v 1 "Interrupt received in operation %s" (append ... args))) 
(signal (car err) (cdr err))) (error (cond ((and completion ... ...) t) ((and 
completion ... ...) filename) (t (signal ... ...))))) (tramp-run-real-handler 
operation args))))
  (progn (let* ((filename (tramp-replace-environment-variables (apply (quote 
tramp-file-name-for-operation) operation args))) (completion 
(tramp-completion-mode-p)) (foreign (tramp-find-foreign-file-name-handler 
filename))) (with-parsed-tramp-file-name filename nil (if foreign 
(tramp-compat-condition-case-unless-debug err (let ((sf ...) result) (when (and 
... ...) (let ... ...)) (setq result (catch ... ...)) (cond (... ... ...) (... 
...) (t result))) ((debug quit) (let (tramp-message-show-message) 
(tramp-message v 1 "Interrupt received in operation %s" ...)) (signal (car err) 
(cdr err))) (error (cond (... t) (... filename) (t ...)))) 
(tramp-run-real-handler operation args)))))
  (unwind-protect (progn (let* ((filename (tramp-replace-environment-variables 
(apply (quote tramp-file-name-for-operation) operation args))) (completion 
(tramp-completion-mode-p)) (foreign (tramp-find-foreign-file-name-handler 
filename))) (with-parsed-tramp-file-name filename nil (if foreign 
(tramp-compat-condition-case-unless-debug err (let (... result) (when ... ...) 
(setq result ...) (cond ... ... ...)) ((debug quit) (let ... ...) (signal ... 
...)) (error (cond ... ... ...))) (tramp-run-real-handler operation args))))) 
(set-match-data save-match-data-internal (quote evaporate)))
  (let ((save-match-data-internal (match-data))) (unwind-protect (progn (let* 
((filename (tramp-replace-environment-variables (apply ... operation args))) 
(completion (tramp-completion-mode-p)) (foreign 
(tramp-find-foreign-file-name-handler filename))) (with-parsed-tramp-file-name 
filename nil (if foreign (tramp-compat-condition-case-unless-debug err (let ... 
... ... ...) (... ... ...) (error ...)) (tramp-run-real-handler operation 
args))))) (set-match-data save-match-data-internal (quote evaporate))))
  (save-match-data (let* ((filename (tramp-replace-environment-variables (apply 
(quote tramp-file-name-for-operation) operation args))) (completion 
(tramp-completion-mode-p)) (foreign (tramp-find-foreign-file-name-handler 
filename))) (with-parsed-tramp-file-name filename nil (if foreign 
(tramp-compat-condition-case-unless-debug err (let ((sf ...) result) (when (and 
... ...) (let ... ...)) (setq result (catch ... ...)) (cond (... ... ...) (... 
...) (t result))) ((debug quit) (let (tramp-message-show-message) 
(tramp-message v 1 "Interrupt received in operation %s" ...)) (signal (car err) 
(cdr err))) (error (cond (... t) (... filename) (t ...)))) 
(tramp-run-real-handler operation args)))))
  (if tramp-mode (save-match-data (let* ((filename 
(tramp-replace-environment-variables (apply (quote 
tramp-file-name-for-operation) operation args))) (completion 
(tramp-completion-mode-p)) (foreign (tramp-find-foreign-file-name-handler 
filename))) (with-parsed-tramp-file-name filename nil (if foreign 
(tramp-compat-condition-case-unless-debug err (let (... result) (when ... ...) 
(setq result ...) (cond ... ... ...)) ((debug quit) (let ... ...) (signal ... 
...)) (error (cond ... ... ...))) (tramp-run-real-handler operation args))))) 
(tramp-run-real-handler operation args))
  tramp-file-name-handler(file-truename 
"/scpc:io.local:/private/tmp/emacs-mac-mrNX/")
  file-truename("/scpc:io.local:/private/tmp/emacs-mac-mrNX/")
  
ede-directory-get-toplevel-open-project("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/")
  
ede-directory-get-open-project("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/"
 ROOT)
  ede-initialize-state-current-buffer()
  ede-minor-mode(1)
  ede-turn-on-hook()
  run-hooks(find-file-hook)
  after-find-file(nil t)
  find-file-noselect-1(#<buffer 0publish-lIS4Ml.xml> 
"/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml" nil nil 
"/private/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml" 
(108180587 234881035))
  
find-file-noselect("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml")
  
server-visit-files((("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml"))
 #<process server <10>> nil)
  #[0 "\301\205 
.\307\301\300\302#\310\311\303\237\"\210\302\203.\312\313\300\"\210\314\300!\210\2020.\304\2040.\211\2040.\312\315\300\"\210\314\300!\210.\204h.\316
 
\204h.\305\203L.\211\204L.\317\320\321\322!\"address@hidden@A#\210\325\326!\210\302\204h.\317\320\321\327!\"\210\305\205t.\306?\205t.\330\305!\207"
 [#<process server <10>> 
(("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml")) nil 
nil nil nil nil server-visit-files mapc funcall server-log "Close nowait 
client" server-delete-client "Close empty client" minibufferp message "%s" 
substitute-command-keys "When done with this frame, type \\[delete-frame]" 
server-switch-buffer nil run-hooks server-switch-hook "When done with a buffer, 
type \\[server-edit]" server-unselect-display isearch-mode] 5 "\n\n(fn)"]()
  funcall(#[0 "\301\205 
.\307\301\300\302#\310\311\303\237\"\210\302\203.\312\313\300\"\210\314\300!\210\2020.\304\2040.\211\2040.\312\315\300\"\210\314\300!\210.\204h.\316
 
\204h.\305\203L.\211\204L.\317\320\321\322!\"address@hidden@A#\210\325\326!\210\302\204h.\317\320\321\327!\"\210\305\205t.\306?\205t.\330\305!\207"
 [#<process server <10>> 
(("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml")) nil 
nil nil nil nil server-visit-files mapc funcall server-log "Close nowait 
client" server-delete-client "Close empty client" minibufferp message "%s" 
substitute-command-keys "When done with this frame, type \\[delete-frame]" 
server-switch-buffer nil run-hooks server-switch-hook "When done with a buffer, 
type \\[server-edit]" server-unselect-display isearch-mode] 5 "\n\n(fn)"])
  #[0 
"\307.\310\311\312\313\314\315\316\300\301\302\303\304\305\306&\317\"\320\321%D\322\311\312\323\324\315\316\300!\325\"\326\327%\310EDC\217)\207"
 [#<process server <10>> 
(("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml")) nil 
nil nil nil nil nil err funcall make-byte-code 0 "\301\205      
.\307\301\300\302#\310\311\303\237\"\210\302\203.\312\313\300\"\210\314\300!\210\2020.\304\2040.\211\2040.\312\315\300\"\210\314\300!\210.\204h.\316
 
\204h.\305\203L.\211\204L.\317\320\321\322!\"address@hidden@A#\210\325\326!\210\302\204h.\317\320\321\327!\"\210\305\205t.\306?\205t.\330\305!\207"
 vconcat vector [server-visit-files mapc funcall server-log "Close nowait 
client" server-delete-client "Close empty client" minibufferp message "%s" 
substitute-command-keys "When done with this frame, type \\[delete-frame]" 
server-switch-buffer nil run-hooks server-switch-hook "When done with a buffer, 
type \\[server-edit]" server-unselect-display isearch-mode] 5 "\n\n(fn)" (quit 
error) 257 "address@hidden"\207" [quit message "Quit emacsclient request" 
server-return-error] 4 "\n\n(fn ERR)" inhibit-quit] 14 "\n\n(fn)"]()
  funcall(#[0 
"\307.\310\311\312\313\314\315\316\300\301\302\303\304\305\306&\317\"\320\321%D\322\311\312\323\324\315\316\300!\325\"\326\327%\310EDC\217)\207"
 [#<process server <10>> 
(("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml")) nil 
nil nil nil nil nil err funcall make-byte-code 0 "\301\205      
.\307\301\300\302#\310\311\303\237\"\210\302\203.\312\313\300\"\210\314\300!\210\2020.\304\2040.\211\2040.\312\315\300\"\210\314\300!\210.\204h.\316
 
\204h.\305\203L.\211\204L.\317\320\321\322!\"address@hidden@A#\210\325\326!\210\302\204h.\317\320\321\327!\"\210\305\205t.\306?\205t.\330\305!\207"
 vconcat vector [server-visit-files mapc funcall server-log "Close nowait 
client" server-delete-client "Close empty client" minibufferp message "%s" 
substitute-command-keys "When done with this frame, type \\[delete-frame]" 
server-switch-buffer nil run-hooks server-switch-hook "When done with a buffer, 
type \\[server-edit]" server-unselect-display isearch-mode] 5 "\n\n(fn)" (quit 
error) 257 "address@hidden"\207" [quit message "Quit emacsclient request" 
server-return-error] 4 "\n\n(fn ERR)" inhibit-quit] 14 "\n\n(fn)"])
  server-execute(#<process server <10>> 
(("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml")) nil 
nil nil nil nil)
  #[0 
"address@hidden@address@hidden@address@hidden@address@hidden@\306@&*\207" 
[#<process server <10>> (nil) (nil) (nil) (nil) 
("/Users/dave/src/ryppl/feeds/") (nil) 
((("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml"))) 
get-buffer-create file-directory-p server-execute server-buffer 
default-directory] 8 "\n\n(fn)"]()
  #[0 "\300 \207" [#[0 
"address@hidden@address@hidden@address@hidden@address@hidden@\306@&*\207" 
[#<process server <10>> (nil) (nil) (nil) (nil) 
("/Users/dave/src/ryppl/feeds/") (nil) 
((("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml"))) 
get-buffer-create file-directory-p server-execute server-buffer 
default-directory] 8 "\n\n(fn)"]] 1 "\n\n(fn)"]()
  funcall(#[0 "\300 \207" [#[0 
"address@hidden@address@hidden@address@hidden@address@hidden@\306@&*\207" 
[#<process server <10>> (nil) (nil) (nil) (nil) 
("/Users/dave/src/ryppl/feeds/") (nil) 
((("/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/0publish-lIS4Ml.xml"))) 
get-buffer-create file-directory-p server-execute server-buffer 
default-directory] 8 "\n\n(fn)"]] 1 "\n\n(fn)"])
  server-execute-continuation(#<process server <10>>)
  #[0 "\301\300!\207" [#<process server <10>> server-execute-continuation] 2 
"\n\n(fn)"]()
  apply(#[0 "\301\300!\207" [#<process server <10>> 
server-execute-continuation] 2 "\n\n(fn)"] nil)
  byte-code("r\301\302H\303H\"\210)\301\207" [timer apply 5 6] 4)
  timer-event-handler([t 20596 53085 837296 nil #[0 "\301\300!\207" [#<process 
server <10>> server-execute-continuation] 2 "\n\n(fn)"] nil nil])
--8<---------------cut here---------------end--------------->8---





Emacs  : GNU Emacs 24.2.1 (x86_64-apple-darwin11.4.0, Carbon Version 1.6.0 
AppKit 1138.47)
 of 2012-09-20 on pluto.luannocracy.com
Package: tramp (2.2.6-pre)

current state:
==============
(setq
 backup-by-copying nil
 backup-by-copying-when-linked nil
 backup-by-copying-when-mismatch t
 backup-by-copying-when-privileged-mismatch 200
 backup-directory-alist '(("." . "~/.emacs.d/backups"))
 file-name-handler-alist 
'(("\\(?:\\.dz\\|\\.xz\\|\\.lzma\\|\\.lz\\|\\.g?z\\|\\.\\(?:tgz\\|svgz\\|sifz\\)\\|\\.tbz2?\\|\\.bz2\\|\\.Z\\)\\(?:~\\|\\.~[-[:alnum:]:address@hidden(?:~[[:digit:]]+\\)?~\\)?\\'"
 . jka-compr-handler)
                           ("\\.gpg\\(~\\|\\.~[0-9]+~\\)?\\'" . 
epa-file-handler)
                           ("\\`/[^/]*\\'" . tramp-completion-file-name-handler)
                           ("\\`/\\([^[/|:]+\\|[^/|]+]\\):" . 
tramp-file-name-handler)
                           ("\\`/:" . file-name-non-special))
 password-cache t
 password-cache-expiry 16
 remote-file-name-inhibit-cache 10
 shell-prompt-pattern "^[^#$%>\n]*[#$%>] *"
 tramp-actions-before-shell '((tramp-login-prompt-regexp tramp-action-login)
                              (tramp-password-prompt-regexp 
tramp-action-password)
                              (tramp-wrong-passwd-regexp 
tramp-action-permission-denied)
                              (shell-prompt-pattern tramp-action-succeed)
                              (tramp-shell-prompt-pattern tramp-action-succeed)
                              (tramp-yesno-prompt-regexp tramp-action-yesno)
                              (tramp-yn-prompt-regexp tramp-action-yn)
                              (tramp-terminal-prompt-regexp 
tramp-action-terminal)
                              (tramp-process-alive-regexp 
tramp-action-process-alive))
 tramp-actions-copy-out-of-band '((tramp-password-prompt-regexp 
tramp-action-password)
                                  (tramp-wrong-passwd-regexp 
tramp-action-permission-denied)
                                  (tramp-copy-failed-regexp 
tramp-action-permission-denied)
                                  (tramp-process-alive-regexp 
tramp-action-out-of-band))
 tramp-auto-save-directory nil
 tramp-backup-directory-alist '(("." . "~/.emacs.d/backups"))
 tramp-bug-report-address "address@hidden"
 tramp-cache-data '(("#<process *tramp/scpc io.local*>"
                     ("vector" ["scpc" nil "io.local" 
"/private/tmp/emacs-mac-mrNX/" nil])
                     ("temp-file" 
"/var/folders/b2/w0_x7_854hz82sbrdxqqd6gr0000gn/T/tramp.4635hAj")
                     ("last-cmd-time" (20596 52590 898627)))
                    )
 tramp-cache-data-changed t
 tramp-cache-unload-hook '((lambda nil
                            (remove-hook (quote kill-emacs-hook)
                             (quote tramp-dump-connection-properties))
                            )
                           (lambda nil
                            (remove-hook (quote before-revert-hook) (quote 
tramp-flush-file-function))
                            (remove-hook (quote eshell-pre-command-hook)
                             (quote tramp-flush-file-function))
                            (remove-hook (quote kill-buffer-hook) (quote 
tramp-flush-file-function)))
                           )
 tramp-chunksize nil
 ;; Variable encoded due to non-printable characters.
 tramp-color-escape-sequence-regexp (base64-decode-string "G1tbOzAtOV0rbQ==")
 tramp-completion-file-name-handler-alist '((file-name-all-completions .
                                             
tramp-completion-handle-file-name-all-completions)
                                            (file-name-completion .
                                             
tramp-completion-handle-file-name-completion)
                                            )
 tramp-completion-file-name-regexp "\\`/[^/]*\\'"
 tramp-completion-file-name-regexp-separate "\\`/\\([[][^]]*\\)?\\'"
 tramp-completion-file-name-regexp-unified "\\`/[^/]*\\'"
 tramp-completion-file-name-regexp-url 
"\\`/[^/:]+\\(:\\(/\\(/[^/]*\\)?\\)?\\)?\\'"
 tramp-completion-function-alist '(("fcp" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("pscp" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("plink1" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("plink" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("krlogin" (tramp-parse-rhosts 
"/etc/hosts.equiv"))
                                   ("ksu" (tramp-parse-passwd "/etc/passwd"))
                                   ("sudo" (tramp-parse-passwd "/etc/passwd"))
                                   ("su" (tramp-parse-passwd "/etc/passwd"))
                                   ("telnet" (tramp-parse-hosts "/etc/hosts"))
                                   ("sshx" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("ssh2_old" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("ssh1_old" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("ssh2" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("ssh1" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("ssh" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("remsh" (tramp-parse-rhosts 
"/etc/hosts.equiv"))
                                   ("rsh" (tramp-parse-rhosts 
"/etc/hosts.equiv"))
                                   ("rsyncc" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("rsync" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("sftp" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("scpx" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("scpc" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("scp2" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("scp1" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("scp" (tramp-parse-rhosts 
"/etc/hosts.equiv")
                                    (tramp-parse-sconfig "/etc/ssh_config")
                                    (tramp-parse-shosts "~/.ssh/known_hosts")
                                    (tramp-parse-sconfig "~/.ssh/config"))
                                   ("remcp" (tramp-parse-rhosts 
"/etc/hosts.equiv"))
                                   ("rcp" (tramp-parse-rhosts 
"/etc/hosts.equiv"))
                                   ("ftp" (tramp-parse-netrc "~/.netrc"))
                                   ("smb" (tramp-parse-netrc "~/.netrc")))
 tramp-completion-function-alist-putty '((tramp-parse-putty 
"~/.putty/sessions"))
 tramp-completion-function-alist-rsh '((tramp-parse-rhosts "/etc/hosts.equiv"))
 tramp-completion-function-alist-ssh '((tramp-parse-rhosts "/etc/hosts.equiv")
                                       (tramp-parse-sconfig "/etc/ssh_config")
                                       (tramp-parse-shosts "~/.ssh/known_hosts")
                                       (tramp-parse-sconfig "~/.ssh/config"))
 tramp-completion-function-alist-su '((tramp-parse-passwd "/etc/passwd"))
 tramp-completion-function-alist-telnet '((tramp-parse-hosts "/etc/hosts"))
 tramp-completion-mode nil
 tramp-completion-reread-directory-timeout 10
 tramp-copy-failed-regexp "\\(.+: \\(No such file or directory\\|Permission 
denied\\|is a directory\\|not a regular file\\)\\)\\s-*"
 tramp-copy-size-limit 10240
 tramp-current-connection '(("scpc" nil "io.local" 
"/private/tmp/emacs-mac-mrNX/") 20596 52776 360147)
 tramp-current-host "io.local"
 tramp-current-method "scpc"
 tramp-current-user nil
 tramp-debug-outline-regexp "[0-9]+:[0-9]+:[0-9]+\\.[0-9]+ [a-z0-9-]+ 
(\\([0-9]+\\)) #"
 tramp-default-host "localhost"
 tramp-default-method "scpc"
 tramp-default-method-alist '((nil "%" "smb")
                              
("\\`\\(127\\.0\\.0\\.1\\|::1\\|localhost6?\\|pluto\\.luannocracy\\.com\\)\\'" 
"\\`root\\'" "su")
                              (nil "\\`\\(anonymous\\|ftp\\)\\'" "ftp") 
("\\`ftp\\." nil "ftp"))
 tramp-default-proxies-alist '(("\\`localhost\\'" nil nil) 
("\\`206.217.198.21\\'" nil nil)
                               ("\\`.+\\'" "\\`root\\'" "/ssh:%h:"))
 tramp-default-user nil
 tramp-default-user-alist '(("\\`smb\\'" nil nil)
                            
("\\`\\(?:fcp\\|krlogin\\|r\\(?:cp\\|emcp\\|sh\\)\\|telnet\\)\\'" nil
                             "dave")
                            ("\\`\\(?:ksu\\|su\\(?:do\\)?\\)\\'" nil "root")
                            ("\\`\\(?:socks\\|tunnel\\)\\'" nil "dave") 
("\\`synce\\'" nil nil))
 tramp-devices 2
 tramp-domain-regexp "[-a-zA-Z0-9_.]+"
 tramp-echo-mark "_echo"
 tramp-echo-mark-marker "_echo"
 tramp-echo-mark-marker-length 5
 tramp-echoed-echo-mark-regexp "_echo\\(\\( \\)?\\)\\{5\\}"
 tramp-efs-method "ftp"
 tramp-encoding-command-interactive "-i"
 tramp-encoding-command-switch "-c"
 tramp-encoding-shell "/bin/sh"
 tramp-end-of-output "///85dcfddf95da9e8c884bad1dc6290e0d#$"
 tramp-file-mode-type-map '((0 . "-") (1 . "p") (2 . "c") (3 . "m") (4 . "d") 
(5 . "?") (6 . "b")
                            (7 . "?") (8 . "-") (9 . "n") (10 . "l") (11 . "?") 
(12 . "s") (13 . "D")
                            (14 . "w"))
 tramp-file-name-regexp "\\`/\\([^[/|:]+\\|[^/|]+]\\):"
 tramp-file-name-regexp-separate "\\`/\\[.*\\]"
 tramp-file-name-regexp-unified "\\`/\\([^[/|:]+\\|[^/|]+]\\):"
 tramp-file-name-regexp-url "\\`/[^/|:]+://"
 tramp-file-name-structure 
'("^/\\(\\(?:\\(?:\\([a-zA-Z_0-9-]+\\):\\)?\\(?:\\([^/|:     
]+\\)@\\)?\\(\\(?:[a-zA-Z0-9_.-]+\\|\\[\\(?:\\(?:[a-zA-Z0-9]+\\)?:\\)+[a-zA-Z0-9.]+]\\)\\(?:#[0-9]+\\)?\\)?|\\)+\\)?\\(?:\\([a-zA-Z_0-9-]+\\):\\)?\\(?:\\([^/|:
         
]+\\)@\\)?\\(\\(?:[a-zA-Z0-9_.-]+\\|\\[\\(?:\\(?:[a-zA-Z0-9]+\\)?:\\)+[a-zA-Z0-9.]+]\\)\\(?:#[0-9]+\\)?\\)?:\\(.*$\\)"
 5 6 7 8 1)
 tramp-foreign-file-name-handler-alist '((tramp-smb-file-name-p . 
tramp-smb-file-name-handler)
                                         (tramp-gvfs-file-name-p . 
tramp-gvfs-file-name-handler)
                                         (tramp-ftp-file-name-p . 
tramp-ftp-file-name-handler)
                                         (identity . 
tramp-sh-file-name-handler))
 tramp-ftp-method "ftp"
 tramp-gvfs-methods '("dav" "davs" "obex" "synce")
 tramp-gw-socks-method "socks"
 tramp-gw-tunnel-method "tunnel"
 tramp-half-a-year '(241 17024)
 tramp-handle-file-local-copy-hook nil
 tramp-handle-write-region-hook nil
 tramp-host-regexp "[a-zA-Z0-9_.-]+"
 tramp-host-with-port-regexp "\\([a-zA-Z0-9_.-]+\\)#\\([0-9]+\\)"
 tramp-initial-end-of-output "#$ "
 tramp-inline-compress-commands '(("gzip" "gzip -d") ("bzip2" "bzip2 -d") ("xz" 
"xz -d")
                                  ("compress" "compress -d"))
 tramp-inline-compress-start-size 4096
 tramp-inodes 0
 tramp-ipv6-regexp "\\(?:\\(?:[a-zA-Z0-9]+\\)?:\\)+[a-zA-Z0-9.]+"
 tramp-local-coding-commands '((b64 base64-encode-region base64-decode-region)
                               (uu tramp-uuencode-region uudecode-decode-region)
                               (pack
                                "perl -e 'binmode STDIN; binmode STDOUT; print 
pack(q{u*}, join q{}, <>)'" "perl -e 'binmode STDIN; binmode STDOUT; print 
unpack(q{u*}, join q{}, <>)'")
                               )
 tramp-local-end-of-line "\n"
 tramp-local-host-regexp 
"\\`\\(127\\.0\\.0\\.1\\|::1\\|localhost6?\\|pluto\\.luannocracy\\.com\\)\\'"
 tramp-localname-regexp ".*$"
 tramp-locked nil
 tramp-locker nil
 tramp-login-prompt-regexp ".*ogin\\( .*\\)?: *"
 tramp-message-show-message t
 tramp-message-show-progress-reporter-message t
 tramp-method-regexp "[a-zA-Z_0-9-]+"
 tramp-methods '(("smb" (tramp-remote-shell "") (tramp-tmpdir "/C$/Temp"))
                 ("fcp" (tramp-login-program "fsh") (tramp-login-args (("%h") 
("-l" "%u") ("sh" "-i")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-i") ("-c"))
                  (tramp-copy-program "fcp") (tramp-copy-args (("-p" "%k"))) 
(tramp-copy-keep-date t))
                 ("psftp" (tramp-login-program "plink")
                  (tramp-login-args (("-l" "%u") ("-P" "%p") ("-ssh") ("%h")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c"))
                  (tramp-copy-program "pscp")
                  (tramp-copy-args (("-l" "%u") ("-P" "%p") ("-sftp") ("-p" 
"%k") ("-q") ("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-recursive t))
                 ("pscp" (tramp-login-program "plink")
                  (tramp-login-args (("-l" "%u") ("-P" "%p") ("-ssh") ("%h")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c"))
                  (tramp-copy-program "pscp")
                  (tramp-copy-args (("-l" "%u") ("-P" "%p") ("-scp") ("-p" 
"%k") ("-q") ("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-recursive t) 
(tramp-default-port 22))
                 ("plinkx" (tramp-login-program "plink")
                  (tramp-login-args
                   (("-load") ("%h") ("-t") ("env 'TERM=dumb' 'PROMPT_COMMAND=' 
'PS1=#$ '") ("/bin/sh"))
                   )
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c")))
                 ("plink1" (tramp-login-program "plink")
                  (tramp-login-args (("-l" "%u") ("-P" "%p") ("-1" "-ssh") 
("%h")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c"))
                  (tramp-default-port 22))
                 ("plink" (tramp-login-program "plink")
                  (tramp-login-args (("-l" "%u") ("-P" "%p") ("-ssh") ("%h")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c"))
                  (tramp-default-port 22))
                 ("krlogin" (tramp-login-program "krlogin")
                  (tramp-login-args (("%h") ("-l" "%u") ("-x"))) 
(tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")))
                 ("ksu" (tramp-login-program "ksu") (tramp-login-args (("%u") 
("-q")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c")))
                 ("sudo" (tramp-login-program "sudo")
                  (tramp-login-args (("-u" "%u") ("-s") ("-H") ("-p" 
"Password:")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c")))
                 ("su" (tramp-login-program "su") (tramp-login-args (("-") 
("%u")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c")))
                 ("telnet" (tramp-login-program "telnet") (tramp-login-args 
(("%h") ("%p")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c"))
                  (tramp-default-port 23))
                 ("sshx" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("-l" "%u") ("-p" "%p") ("-e" "none") ("-t" "-t") ("%h") 
("/bin/sh")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c"))
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("ssh2" (tramp-login-program "ssh")
                  (tramp-login-args (("-l" "%u") ("-p" "%p") ("-2") ("-e" 
"none") ("%h")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c"))
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("ssh1" (tramp-login-program "ssh")
                  (tramp-login-args (("-l" "%u") ("-p" "%p") ("-1") ("-e" 
"none") ("%h")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c"))
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("ssh" (tramp-login-program "ssh")
                  (tramp-login-args (("-l" "%u") ("-p" "%p") ("-e" "none") 
("%h")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c"))
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("remsh" (tramp-login-program "remsh") (tramp-login-args 
(("%h") ("-l" "%u")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c")))
                 ("rsh" (tramp-login-program "rsh") (tramp-login-args (("%h") 
("-l" "%u")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c")))
                 ("rsyncc" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("-l" "%u") ("-p" "%p") ("-o" "address@hidden:%%p")
                    ("-o" "ControlMaster=yes") ("-e" "none") ("%h"))
                   )
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")) (tramp-copy-program "rsync")
                  (tramp-copy-args (("-t" "%k") ("-r")))
                  (tramp-copy-env
                   (("RSYNC_RSH") ("ssh -o address@hidden:%%p -o 
ControlMaster=auto")))
                  (tramp-copy-keep-date t) (tramp-copy-keep-tmpfile t) 
(tramp-copy-recursive t))
                 ("rsync" (tramp-login-program "ssh")
                  (tramp-login-args (("-l" "%u") ("-p" "%p") ("-e" "none") 
("%h")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")) (tramp-copy-program "rsync")
                  (tramp-copy-args (("-e" "ssh") ("-t" "%k") ("-r"))) 
(tramp-copy-keep-date t)
                  (tramp-copy-keep-tmpfile t) (tramp-copy-recursive t))
                 ("sftp" (tramp-login-program "ssh")
                  (tramp-login-args (("-l" "%u") ("-p" "%p") ("-e" "none") 
("%h")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")) (tramp-copy-program "sftp"))
                 ("scpx" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("-l" "%u") ("-p" "%p") ("-e" "none") ("-t" "-t") ("%h") 
("/bin/sh")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")) (tramp-copy-program "scp")
                  (tramp-copy-args (("-P" "%p") ("-p" "%k") ("-q") ("-r"))) 
(tramp-copy-keep-date t)
                  (tramp-copy-recursive t)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("scpc" (tramp-login-program "ssh")
                  (tramp-login-args
                   (("-l" "%u") ("-p" "%p") ("-o" "address@hidden:%%p")
                    ("-o" "ControlMaster=yes") ("-e" "none") ("%h"))
                   )
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")) (tramp-copy-program "scp")
                  (tramp-copy-args
                   (("-P" "%p") ("-p" "%k") ("-q") ("-r") ("-o" 
"address@hidden:%%p")
                    ("-o" "ControlMaster=auto"))
                   )
                  (tramp-copy-keep-date t) (tramp-copy-recursive t)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("scp2" (tramp-login-program "ssh")
                  (tramp-login-args (("-l" "%u") ("-p" "%p") ("-2") ("-e" 
"none") ("%h")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")) (tramp-copy-program "scp")
                  (tramp-copy-args (("-2") ("-P" "%p") ("-p" "%k") ("-q") 
("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-recursive t)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("scp1" (tramp-login-program "ssh")
                  (tramp-login-args (("-l" "%u") ("-p" "%p") ("-1") ("-e" 
"none") ("%h")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")) (tramp-copy-program "scp")
                  (tramp-copy-args (("-1") ("-P" "%p") ("-p" "%k") ("-q") 
("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-recursive t)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("scp" (tramp-login-program "ssh")
                  (tramp-login-args (("-l" "%u") ("-p" "%p") ("-e" "none") 
("%h")))
                  (tramp-async-args (("-q"))) (tramp-remote-shell "/bin/sh")
                  (tramp-remote-shell-args ("-c")) (tramp-copy-program "scp")
                  (tramp-copy-args (("-P" "%p") ("-p" "%k") ("-q") ("-r"))) 
(tramp-copy-keep-date t)
                  (tramp-copy-recursive t)
                  (tramp-gw-args
                   (("-o" "GlobalKnownHostsFile=/dev/null") ("-o" 
"UserKnownHostsFile=/dev/null")
                    ("-o" "StrictHostKeyChecking=no"))
                   )
                  (tramp-default-port 22))
                 ("remcp" (tramp-login-program "remsh") (tramp-login-args 
(("%h") ("-l" "%u")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c"))
                  (tramp-copy-program "rcp") (tramp-copy-args (("-p" "%k"))) 
(tramp-copy-keep-date t))
                 ("rcp" (tramp-login-program "rsh") (tramp-login-args (("%h") 
("-l" "%u")))
                  (tramp-remote-shell "/bin/sh") (tramp-remote-shell-args 
("-c"))
                  (tramp-copy-program "rcp") (tramp-copy-args (("-p" "%k") 
("-r")))
                  (tramp-copy-keep-date t) (tramp-copy-recursive t))
                 ("synce") ("obex") ("davs") ("dav") ("ftp"))
 tramp-mode t
 tramp-operation-not-permitted-regexp "\\(preserving times.*\\|set 
mode\\):\\s-*\\(Operation not permitted\\)"
 tramp-parse-time-months '(("jan" . 1) ("feb" . 2) ("mar" . 3) ("apr" . 4) 
("may" . 5) ("jun" . 6)
                           ("jul" . 7) ("aug" . 8) ("sep" . 9) ("oct" . 10) 
("nov" . 11) ("dec" . 12))
 ;; Variable encoded due to non-printable characters.
 tramp-password-prompt-regexp (base64-decode-string 
"Xi4qXChbcFBdYXNzd29yZFx8W3BQXWFzc3BocmFzZVwpLio6AD8gKg==")
 tramp-perl-decode "%s -e '\n# This script contributed by Juanma Barranquero 
<address@hidden>.\n# Copyright (C) 2002-2012 Free Software Foundation, 
Inc.\nuse strict;\n\nmy %%trans = do {\n    my $i = 0;\n    map {($_, 
substr(unpack(q(B8), chr $i++), 2, 6))}\n      split //, 
q(ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/)\n};\n\nmy 
%%bytes = map {(unpack(q(B8), chr $_), chr $_)} 0 .. 
255;\n\nbinmode(\\*STDOUT);\n\n# We are going to accumulate into $pending to 
accept any line length\n# (we do not check they are <= 76 chars as the RFC 
says)\nmy $pending = q();\n\nwhile (my $data = <STDIN>) {\n    chomp $data;\n\n 
   # If we find one or two =, we have reached the end and\n    # any following 
data is to be discarded\n    my $finished = $data =~ s/(==?).*/$1/;\n    
$pending .= $data;\n\n    my $len = length($pending);\n    my $chunk = 
substr($pending, 0, $len & ~3);\n    $pending = substr($pending, $len & ~3 + 
1);\n\n    # Easy method: translate from chars to (pregenerated) six-bit 
packets, join,\n    # split in 8-bit chunks and convert back to char.\n    
print join q(),\n      map $bytes{$_},\n        ((join q(), map {$trans{$_} || 
q()} split //, $chunk) =~ /......../g);\n\n    last if $finished;\n}' 
2>/dev/null"
 tramp-perl-decode-with-module "%s -MMIME::Base64 -0777 -ne 'print 
decode_base64($_)' 2>/dev/null"
 tramp-perl-directory-files-and-attributes "%s -e '\nchdir($ARGV[0]) or 
printf(\"\\\"Cannot change to $ARGV[0]: $''!''\\\"\\n\"), 
exit();\nopendir(DIR,\".\") or printf(\"\\\"Cannot open directory $ARGV[0]: 
$''!''\\\"\\n\"), exit();address@hidden = readdir(DIR);\nclosedir(DIR);\n$n = 
scalar(@list);\nprintf(\"(\\n\");\nfor($i = 0; $i < $n; $i++)\n{\n    $filename 
= $list[$i];\n    @stat = lstat($filename);\n    if (($stat[2] & 0170000) == 
0120000)\n    {\n        $type = readlink($filename);\n        $type = 
\"\\\"$type\\\"\";\n    }\n    elsif (($stat[2] & 0170000) == 040000)\n    {\n  
      $type = \"t\";\n    }\n    else\n    {\n        $type = \"nil\"\n    };\n 
   $uid = ($ARGV[1] eq \"integer\") ? $stat[4] : \"\\\"\" . getpwuid($stat[4]) 
. \"\\\"\";\n    $gid = ($ARGV[1] eq \"integer\") ? $stat[5] : \"\\\"\" . 
getgrgid($stat[5]) . \"\\\"\";\n    printf(\n        \"(\\\"%%s\\\" %%s %%u %%s 
%%s (%%u %%u) (%%u %%u) (%%u %%u) %%u.0 %%u t (%%u . %%u) (%%u . %%u))\\n\",\n  
      $filename,\n        $type,\n        $stat[3],\n        $uid,\n        
$gid,\n        $stat[8] >> 16 & 0xffff,\n        $stat[8] & 0xffff,\n        
$stat[9] >> 16 & 0xffff,\n        $stat[9] & 0xffff,\n        $stat[10] >> 16 & 
0xffff,\n        $stat[10] & 0xffff,\n        $stat[7],\n        $stat[2],\n    
    $stat[1] >> 16 & 0xffff,\n        $stat[1] & 0xffff,\n        $stat[0] >> 
16 & 0xffff,\n        $stat[0] & 0xffff);\n}\nprintf(\")\\n\");' \"$1\" \"$2\" 
2>/dev/null"
 tramp-perl-encode "%s -e '\n# This script contributed by Juanma Barranquero 
<address@hidden>.\n# Copyright (C) 2002-2012 Free Software Foundation, 
Inc.\nuse strict;\n\nmy %%trans = do {\n    my $i = 0;\n    map 
{(substr(unpack(q(B8), chr $i++), 2, 6), $_)}\n      split //, 
q(ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/);\n};\n\nbinmode(\\*STDIN);\n\n#
 We read in chunks of 54 bytes, to generate output lines\n# of 72 chars (plus 
end of line)\n$/ = \\54;\n\nwhile (my $data = <STDIN>) {\n    my $pad = 
q();\n\n    # Only for the last chunk, and only if did not fill the last 
three-byte packet\n    if (eof) {\n        my $mod = length($data) %% 3;\n      
  $pad = q(=) x (3 - $mod) if $mod;\n    }\n\n    # Not the fastest method, but 
it is simple: unpack to binary string, split\n    # by groups of 6 bits and 
convert back from binary to byte; then map into\n    # the translation table\n  
  print\n      join q(),\n        map($trans{$_},\n            
(substr(unpack(q(B*), $data) . q(00000), 0, 432) =~ /....../g)),\n              
$pad,\n                qq(\\n);\n}' 2>/dev/null"
 tramp-perl-encode-with-module "%s -MMIME::Base64 -0777 -ne 'print 
encode_base64($_)' 2>/dev/null"
 tramp-perl-file-attributes "%s -e 'address@hidden = lstat($ARGV[0]);\nif 
(address@hidden) {\n    print \"nil\\n\";\n    exit 0;\n}\nif (($stat[2] & 
0170000) == 0120000)\n{\n    $type = readlink($ARGV[0]);\n    $type = 
\"\\\"$type\\\"\";\n}\nelsif (($stat[2] & 0170000) == 040000)\n{\n    $type = 
\"t\";\n}\nelse\n{\n    $type = \"nil\"\n};\n$uid = ($ARGV[1] eq \"integer\") ? 
$stat[4] : \"\\\"\" . getpwuid($stat[4]) . \"\\\"\";\n$gid = ($ARGV[1] eq 
\"integer\") ? $stat[5] : \"\\\"\" . getgrgid($stat[5]) . \"\\\"\";\nprintf(\n  
  \"(%%s %%u %%s %%s (%%u %%u) (%%u %%u) (%%u %%u) %%u.0 %%u t (%%u . %%u) 
-1)\\n\",\n    $type,\n    $stat[3],\n    $uid,\n    $gid,\n    $stat[8] >> 16 
& 0xffff,\n    $stat[8] & 0xffff,\n    $stat[9] >> 16 & 0xffff,\n    $stat[9] & 
0xffff,\n    $stat[10] >> 16 & 0xffff,\n    $stat[10] & 0xffff,\n    
$stat[7],\n    $stat[2],\n    $stat[1] >> 16 & 0xffff,\n    $stat[1] & 
0xffff\n);' \"$1\" \"$2\" 2>/dev/null"
 tramp-perl-file-name-all-completions "%s -e 'sub case {\n my $str = shift;\n 
if ($ARGV[2]) {\n  return lc($str);\n }\n else {\n  return $str;\n 
}\n}\nopendir(d, $ARGV[0]) || die(\"$ARGV[0]: $!\\nfail\\n\");address@hidden = 
readdir(d); closedir(d);\nforeach $f (@files) {\n if (case(substr($f, 0, 
length($ARGV[1]))) eq case($ARGV[1])) {\n  if (-d \"$ARGV[0]/$f\") {\n   print 
\"$f/\\n\";\n  }\n  else {\n   print \"$f\\n\";\n  }\n }\n}\nprint \"ok\\n\"\n' 
\"$1\" \"$2\" \"$3\" 2>/dev/null"
 tramp-perl-file-truename "%s -e '\nuse File::Spec;\nuse Cwd 
\"realpath\";\n\nsub recursive {\n    my ($volume, @dirs) = @_;\n    my $real = 
realpath(File::Spec->catpath(\n                   $volume, 
File::Spec->catdir(@dirs), \"\"));\n    if ($real) {\n        my ($vol, $dir) = 
File::Spec->splitpath($real, 1);\n        return ($vol, 
File::Spec->splitdir($dir));\n    }\n    else {\n        my $last = 
pop(@dirs);\n        ($volume, @dirs) = recursive($volume, @dirs);\n        
push(@dirs, $last);\n        return ($volume, @dirs);\n    }\n}\n\n$result = 
realpath($ARGV[0]);\nif (!$result) {\n    my ($vol, $dir) = 
File::Spec->splitpath($ARGV[0], 1);\n    ($vol, @dirs) = recursive($vol, 
File::Spec->splitdir($dir));\n\n    $result = File::Spec->catpath($vol, 
File::Spec->catdir(@dirs), \"\");\n}\n\nif ($ARGV[0] =~ /\\/$/) {\n    $result 
= $result . \"/\";\n}\n\nprint \"\\\"$result\\\"\\n\";\n' \"$1\" 2>/dev/null"
 tramp-persistency-file-name "/Users/dave/.emacs.d/tramp"
 tramp-port-regexp "[0-9]+"
 tramp-postfix-hop-format "|"
 tramp-postfix-hop-regexp "|"
 tramp-postfix-host-format ":"
 tramp-postfix-host-regexp ":"
 tramp-postfix-ipv6-format "]"
 tramp-postfix-ipv6-regexp "]"
 tramp-postfix-method-format ":"
 tramp-postfix-method-regexp ":"
 tramp-postfix-user-format "@"
 tramp-postfix-user-regexp "@"
 tramp-prefix-domain-format "%"
 tramp-prefix-domain-regexp "%"
 tramp-prefix-format "/"
 tramp-prefix-ipv6-format "["
 tramp-prefix-ipv6-regexp "\\["
 tramp-prefix-port-format "#"
 tramp-prefix-port-regexp "#"
 tramp-prefix-regexp "^/"
 tramp-process-alive-regexp ""
 tramp-process-connection-type t
 tramp-remote-coding-commands '((b64 "base64" "base64 -d -i") (b64 "base64" 
"base64 -d")
                                (b64 "mimencode -b" "mimencode -u -b")
                                (b64 "mmencode -b" "mmencode -u -b")
                                (b64 "recode data..base64" "recode 
base64..data")
                                (b64 tramp-perl-encode-with-module 
tramp-perl-decode-with-module)
                                (b64 tramp-perl-encode tramp-perl-decode)
                                (uu "uuencode xxx" "uudecode -o /dev/stdout" 
"test -c /dev/stdout")
                                (uu "uuencode xxx" "uudecode -o -") (uu 
"uuencode xxx" "uudecode -p")
                                (uu "uuencode xxx" tramp-uudecode)
                                (pack
                                 "perl -e 'binmode STDIN; binmode STDOUT; print 
pack(q{u*}, join q{}, <>)'" "perl -e 'binmode STDIN; binmode STDOUT; print 
unpack(q{u*}, join q{}, <>)'")
                                )
 tramp-remote-file-name-spec-regexp 
"\\(?:\\([a-zA-Z_0-9-]+\\):\\)?\\(?:\\([^/|:        
]+\\)@\\)?\\(\\(?:[a-zA-Z0-9_.-]+\\|\\[\\(?:\\(?:[a-zA-Z0-9]+\\)?:\\)+[a-zA-Z0-9.]+]\\)\\(?:#[0-9]+\\)?\\)?"
 tramp-remote-path '(tramp-default-remote-path "/usr/sbin" "/usr/local/sbin" 
"/usr/local/bin" "/sbin"
                     "/local/bin" "/local/freeware/bin" "/local/gnu/bin" 
"/usr/freeware/bin"
                     "/usr/pkg/bin" "/usr/contrib/bin")
 tramp-remote-process-environment '("HISTFILE=$HOME/.tramp_history" 
"HISTSIZE=1" "LC_ALL=C" "TERM=dumb"
                                    "EMACS=t" 
"INSIDE_EMACS='24.2.1,tramp:2.2.6-pre'" "CDPATH="
                                    "HISTORY=" "MAIL=" "MAILCHECK=" "MAILPATH=" 
"PAGER=\"\""
                                    "autocorrect=" "correct=")
 tramp-rfn-eshadow-overlay nil
 tramp-rfn-eshadow-update-overlay-regexp "[^:/~]*\\(/\\|~\\)"
 tramp-rsh-end-of-line "\n"
 tramp-save-ad-hoc-proxies nil
 tramp-sh-extra-args '(("/bash\\'" . "-norc -noprofile"))
 tramp-sh-file-name-handler-alist '((load . tramp-handle-load)
                                    (make-symbolic-link . 
tramp-sh-handle-make-symbolic-link)
                                    (file-name-as-directory . 
tramp-handle-file-name-as-directory)
                                    (file-name-directory . 
tramp-handle-file-name-directory)
                                    (file-name-nondirectory . 
tramp-handle-file-name-nondirectory)
                                    (file-truename . 
tramp-sh-handle-file-truename)
                                    (file-exists-p . 
tramp-sh-handle-file-exists-p)
                                    (file-directory-p . 
tramp-sh-handle-file-directory-p)
                                    (file-executable-p . 
tramp-sh-handle-file-executable-p)
                                    (file-readable-p . 
tramp-sh-handle-file-readable-p)
                                    (file-regular-p . 
tramp-handle-file-regular-p)
                                    (file-symlink-p . 
tramp-handle-file-symlink-p)
                                    (file-writable-p . 
tramp-sh-handle-file-writable-p)
                                    (file-ownership-preserved-p .
                                     tramp-sh-handle-file-ownership-preserved-p)
                                    (file-newer-than-file-p . 
tramp-sh-handle-file-newer-than-file-p)
                                    (file-attributes . 
tramp-sh-handle-file-attributes)
                                    (file-modes . tramp-handle-file-modes)
                                    (directory-files . 
tramp-handle-directory-files)
                                    (directory-files-and-attributes .
                                     
tramp-sh-handle-directory-files-and-attributes)
                                    (file-name-all-completions .
                                     tramp-sh-handle-file-name-all-completions)
                                    (file-name-completion . 
tramp-handle-file-name-completion)
                                    (add-name-to-file . 
tramp-sh-handle-add-name-to-file)
                                    (copy-file . tramp-sh-handle-copy-file)
                                    (copy-directory . 
tramp-sh-handle-copy-directory)
                                    (rename-file . tramp-sh-handle-rename-file)
                                    (set-file-modes . 
tramp-sh-handle-set-file-modes)
                                    (set-file-times . 
tramp-sh-handle-set-file-times)
                                    (make-directory . 
tramp-sh-handle-make-directory)
                                    (delete-directory . 
tramp-sh-handle-delete-directory)
                                    (delete-file . tramp-sh-handle-delete-file)
                                    (directory-file-name . 
tramp-handle-directory-file-name)
                                    (executable-find . 
tramp-sh-handle-executable-find)
                                    (start-file-process . 
tramp-sh-handle-start-file-process)
                                    (process-file . 
tramp-sh-handle-process-file)
                                    (shell-command . tramp-handle-shell-command)
                                    (insert-directory . 
tramp-sh-handle-insert-directory)
                                    (expand-file-name . 
tramp-sh-handle-expand-file-name)
                                    (substitute-in-file-name . 
tramp-handle-substitute-in-file-name)
                                    (file-local-copy . 
tramp-sh-handle-file-local-copy)
                                    (file-remote-p . tramp-handle-file-remote-p)
                                    (insert-file-contents . 
tramp-handle-insert-file-contents)
                                    (insert-file-contents-literally .
                                     
tramp-sh-handle-insert-file-contents-literally)
                                    (write-region . 
tramp-sh-handle-write-region)
                                    (find-backup-file-name . 
tramp-handle-find-backup-file-name)
                                    (make-auto-save-file-name .
                                     tramp-sh-handle-make-auto-save-file-name)
                                    (unhandled-file-name-directory .
                                     tramp-handle-unhandled-file-name-directory)
                                    (dired-compress-file . 
tramp-sh-handle-dired-compress-file)
                                    (dired-recursive-delete-directory .
                                     
tramp-sh-handle-dired-recursive-delete-directory)
                                    (dired-uncache . tramp-handle-dired-uncache)
                                    (set-visited-file-modtime .
                                     tramp-sh-handle-set-visited-file-modtime)
                                    (verify-visited-file-modtime .
                                     
tramp-sh-handle-verify-visited-file-modtime)
                                    (file-selinux-context . 
tramp-sh-handle-file-selinux-context)
                                    (set-file-selinux-context .
                                     tramp-sh-handle-set-file-selinux-context)
                                    (vc-registered . 
tramp-sh-handle-vc-registered))
 ;; Variable encoded due to non-printable characters.
 tramp-shell-prompt-pattern (base64-decode-string 
"XCg/Ol5cfA1cKVteXSMkJT4KXSojP1tdIyQlPl0gKlwoG1xbWzAtOTtdKlthLXpBLVpdICpcKSo=")
 tramp-smb-method "smb"
 tramp-syntax 'ftp
 tramp-temp-buffer-file-name nil
 tramp-temp-buffer-name " *tramp temp*"
 tramp-temp-name-prefix "tramp."
 tramp-terminal-prompt-regexp "\\(TERM = (.*)\\|Terminal type\\? 
\\[.*\\]\\)\\s-*"
 tramp-terminal-type "dumb"
 tramp-unload-hook '((lambda nil (unload-feature (quote tramp-cmds) (quote 
force)))
                     (lambda nil (unload-feature (quote tramp-cache) (quote 
force)))
                     (lambda nil (unload-feature (quote tramp-sh) (quote 
force)))
                     (lambda nil
                      (remove-hook (quote eshell-directory-change-hook)
                       (quote tramp-eshell-directory-change))
                      )
                     (lambda nil (remove-hook (quote find-file-hooks) (quote 
tramp-set-auto-save)))
                     (lambda nil
                      (remove-hook (quote auto-save-hook) (quote 
tramp-set-auto-save-file-modes)))
                     (lambda nil
                      (remove-hook (quote kill-buffer-hook) (quote 
tramp-delete-temp-file-function)))
                     tramp-unload-file-name-handlers
                     (lambda nil
                      (remove-hook (quote rfn-eshadow-update-overlay-hook)
                       (quote tramp-rfn-eshadow-update-overlay))
                      )
                     (lambda nil
                      (remove-hook (quote rfn-eshadow-setup-minibuffer-hook)
                       (quote tramp-rfn-eshadow-setup-minibuffer))
                      )
                     (lambda nil (unload-feature (quote tramp-compat) (quote 
force))))
 tramp-user-regexp "[^/|:       ]+"
 tramp-user-with-domain-regexp "\\([^/|:        ]+\\)%\\([-a-zA-Z0-9_.]+\\)"
 tramp-uudecode "(echo begin 600 /tmp/tramp.$$; tail +2) | uudecode\ncat 
/tmp/tramp.$$\nrm -f /tmp/tramp.$$"
 tramp-vc-registered-file-names nil
 tramp-vc-registered-read-file-names "echo \"(\"\nwhile read file; do\n    if 
%s \"$file\"; then\n      echo \"(\\\"$file\\\" \\\"file-exists-p\\\" t)\"\n    
else\n    echo \"(\\\"$file\\\" \\\"file-exists-p\\\" nil)\"\n    fi\n    if %s 
\"$file\"; then\n echo \"(\\\"$file\\\" \\\"file-readable-p\\\" t)\"\n    
else\n  echo \"(\\\"$file\\\" \\\"file-readable-p\\\" nil)\"\n    
fi\ndone\necho \")\""
 tramp-verbose 3
 tramp-version "2.2.6-pre"
 tramp-wrong-passwd-regexp "^.*\\(Connection 
\\(?:\\(?:clo\\|refu\\)sed\\)\\|Host key verification failed\\.\\|Login 
\\(?:[Ii]ncorrect\\)\\|N\\(?:ame or service not known\\|o supported 
authentication methods left to try!\\)\\|Permission denied\\|\\(?:Sorry, try 
again\\|Timeout, server not responding\\)\\.\\).*\\|^.*\\(Received signal 
[0-9]+\\).*"
 tramp-yesno-prompt-regexp "\\(Are you sure you want to continue connecting 
(yes/no)\\?\\)\\s-*"
 tramp-yn-prompt-regexp "\\(\\(?:Store key in cache\\? (y/\\|Update cached 
key\\? (y/n, Return cancels connectio\\)n)\\)\\s-*"
 )
-- 
Dave Abrahams
BoostPro Computing                  Software Development        Training
http://www.boostpro.com             Clang/LLVM/EDG Compilers  C++  Boost


(setq
 buffer-name "*tramp/scpc io.local*"
 )

load-path shadows:
==================
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/trampver hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/trampver
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-uu hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-uu
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-smb hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-smb
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-sh hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-sh
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-loaddefs hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-loaddefs
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-gw hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-gw
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-ftp hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-ftp
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-compat hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-compat
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-cmds hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-cmds
/Users/dave/.emacs.d/el-get/tramp/share/emacs/site-lisp/tramp-cache hides 
/Applications/Emacs.app/Contents/Resources/lisp/net/tramp-cache

This is a special notion of the `gnus/message' package.  If you
use another mail agent (by copying the contents of this buffer)
please ensure that the buffers are attached to your email.

txtzIDQJHSa2u.txt
Description: *tramp/scpc io.local*