[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 1342ccc 1/4: Remove find-file-noselect in Tramp, it
From: |
Michael Albinus |
Subject: |
[Emacs-diffs] master 1342ccc 1/4: Remove find-file-noselect in Tramp, it was handled in XEmacs |
Date: |
Sat, 24 Nov 2018 08:02:13 -0500 (EST) |
branch: master
commit 1342cccd4bcd606cf8fdb477e4b28001a88cc065
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>
Remove find-file-noselect in Tramp, it was handled in XEmacs
* lisp/net/tramp.el (tramp-file-name-for-operation):
Remove `find-file-noselect'.
---
lisp/net/tramp-adb.el | 1 -
lisp/net/tramp-archive.el | 1 -
lisp/net/tramp-gvfs.el | 1 -
lisp/net/tramp-sh.el | 1 -
lisp/net/tramp-smb.el | 1 -
lisp/net/tramp.el | 4 ++--
6 files changed, 2 insertions(+), 7 deletions(-)
diff --git a/lisp/net/tramp-adb.el b/lisp/net/tramp-adb.el
index 00c6ad4..d0cead2 100644
--- a/lisp/net/tramp-adb.el
+++ b/lisp/net/tramp-adb.el
@@ -141,7 +141,6 @@ It is used for TCP/IP devices."
(file-truename . tramp-adb-handle-file-truename)
(file-writable-p . tramp-adb-handle-file-writable-p)
(find-backup-file-name . tramp-handle-find-backup-file-name)
- ;; `find-file-noselect' performed by default handler.
;; `get-file-buffer' performed by default handler.
(insert-directory . tramp-handle-insert-directory)
(insert-file-contents . tramp-handle-insert-file-contents)
diff --git a/lisp/net/tramp-archive.el b/lisp/net/tramp-archive.el
index bb87a83..47f15ce 100644
--- a/lisp/net/tramp-archive.el
+++ b/lisp/net/tramp-archive.el
@@ -253,7 +253,6 @@ It must be supported by libarchive(3).")
(file-truename . tramp-archive-handle-file-truename)
(file-writable-p . ignore)
(find-backup-file-name . ignore)
- ;; `find-file-noselect' performed by default handler.
;; `get-file-buffer' performed by default handler.
(insert-directory . tramp-archive-handle-insert-directory)
(insert-file-contents . tramp-archive-handle-insert-file-contents)
diff --git a/lisp/net/tramp-gvfs.el b/lisp/net/tramp-gvfs.el
index fb687f0..9d53edd 100644
--- a/lisp/net/tramp-gvfs.el
+++ b/lisp/net/tramp-gvfs.el
@@ -569,7 +569,6 @@ It has been changed in GVFS 1.14.")
(file-truename . tramp-handle-file-truename)
(file-writable-p . tramp-gvfs-handle-file-writable-p)
(find-backup-file-name . tramp-handle-find-backup-file-name)
- ;; `find-file-noselect' performed by default handler.
;; `get-file-buffer' performed by default handler.
(insert-directory . tramp-handle-insert-directory)
(insert-file-contents . tramp-handle-insert-file-contents)
diff --git a/lisp/net/tramp-sh.el b/lisp/net/tramp-sh.el
index 4965f83..462ad83 100644
--- a/lisp/net/tramp-sh.el
+++ b/lisp/net/tramp-sh.el
@@ -1023,7 +1023,6 @@ of command line.")
(file-truename . tramp-sh-handle-file-truename)
(file-writable-p . tramp-sh-handle-file-writable-p)
(find-backup-file-name . tramp-handle-find-backup-file-name)
- ;; `find-file-noselect' performed by default handler.
;; `get-file-buffer' performed by default handler.
(insert-directory . tramp-sh-handle-insert-directory)
(insert-file-contents . tramp-handle-insert-file-contents)
diff --git a/lisp/net/tramp-smb.el b/lisp/net/tramp-smb.el
index eadb402..23b5176 100644
--- a/lisp/net/tramp-smb.el
+++ b/lisp/net/tramp-smb.el
@@ -262,7 +262,6 @@ See `tramp-actions-before-shell' for more info.")
(file-truename . tramp-handle-file-truename)
(file-writable-p . tramp-smb-handle-file-writable-p)
(find-backup-file-name . tramp-handle-find-backup-file-name)
- ;; `find-file-noselect' performed by default handler.
;; `get-file-buffer' performed by default handler.
(insert-directory . tramp-smb-handle-insert-directory)
(insert-file-contents . tramp-handle-insert-file-contents)
diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 97f931a..3fbc45f 100644
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -2175,7 +2175,7 @@ ARGS are the arguments OPERATION has been called with."
file-ownership-preserved-p file-readable-p
file-regular-p file-remote-p file-selinux-context
file-symlink-p file-truename file-writable-p
- find-backup-file-name find-file-noselect get-file-buffer
+ find-backup-file-name get-file-buffer
insert-directory insert-file-contents load
make-directory make-directory-internal set-file-acl
set-file-modes set-file-selinux-context set-file-times
@@ -4445,7 +4445,7 @@ ALIST is of the form ((FROM . TO) ...)."
It always returns a return code. The Lisp error raised when
PROGRAM is nil is trapped also, returning 1. Furthermore, traces
are written with verbosity of 6."
- (let ((default-directory (tramp-compat-temporary-file-directory))
+ (let ((default-directory (tramp-compat-temporary-file-directory))
(destination (if (eq destination t) (current-buffer) destination))
output error result)
(tramp-message