Mercurial > emacs
comparison lisp/net/tramp-smb.el @ 55420:c44f9de543e3
2004-05-07 Kai Grossjohann <kai@emptydomain.de>
Version 2.0.40 of Tramp released.
* net/tramp.el (tramp-completion-mode, tramp-md5-function): Use
symbol-function to invoke functions only known on some Emacs
flavors. This avoids byte-compiler warnings. Reported by Kevin
Scaldeferri <kevin@scaldeferri.com>.
(tramp-do-copy-or-rename-file-via-buffer): Renamed from
tramp-do-copy-or-rename-via-buffer (without `file'), to make it
consistent with the other tramp-do-* functions.
(tramp-do-copy-or-rename-file): Calls adjusted.
(tramp-process-initial-commands): Avoid liveness check on shell --
we know that it must be alive since we're opening a connection at
this moment.
(tramp-last-cmd): New internal variable.
(tramp-process-echoes): New tunable.
(tramp-send-command): Set tramp-last-cmd.
(tramp-wait-for-output): Delete echo, if applicable.
(tramp-read-passwd): Construct the key for the password cache in a
way that works for multi methods, too.
(tramp-bug): Add backup-directory-alist and
bkup-backup-directory-info to bug reports, with Tramp
counterparts.
2004-05-01 Michael Albinus <michael.albinus@gmx.de>
* net/tramp*.el: Suppress byte-compiler warnings where possible.
* net/tramp.el (tramp-out-of-band-prompt-regexp)
(tramp-actions-copy-out-of-band): New defcustoms.
(tramp-do-copy-or-rename-file-out-of-band): Asynchronous process
used instead of a synchronous one. Allows password entering.
(tramp-action-out-of-band): New defun.
(tramp-open-connection-rsh, tramp-method-out-of-band-p): Remove
restriction with password from doc string.
(tramp-bug): Add variables `tramp-terminal-prompt-regexp',
`tramp-out-of-band-prompt-regexp',
`tramp-actions-copy-out-of-band', `password-cache' and
`password-cache-expiry'.
(toplevel): Remove todo item wrt ssh-agent. Obsolete due to
password caching.
(tramp-touch): FILE can be a local file, too.
(TODO): Remove items done.
(tramp-handle-insert-directory): Properly quote file name also if
not full-directory-p. Handle wildcard case. Reported by Andreas
Schwab <schwab@suse.de>.
(tramp-do-copy-or-rename-file-via-buffer): Set permissions of the
new file.
(tramp-handle-file-local-copy, tramp-handle-write-region): The
permissions of the temporary file are set if filename exists.
Reported by Ted Stern <stern@cray.com>.
(tramp-backup-directory-alist)
(tramp-bkup-backup-directory-info): New defcustoms.
(tramp-file-name-handler-alist): Add entry for
`find-backup-file-name'.
(tramp-handle-find-backup-file-name): New function. Implements
Tramp's find-backup-file-name.
* net/tramp-smb.el (tramp-smb-file-name-handler-alist): Add entry
for `find-backup-file-name'.
* net/tramp-vc.el (tramp-vc-workfile-unchanged-p): Correct typo
("file" -> "filename"). Reported by Kim F. Storm <storm@cua.dk>.
author | Kai Großjohann <kgrossjo@eu.uu.net> |
---|---|
date | Fri, 07 May 2004 21:20:10 +0000 |
parents | c1bfc266f10a |
children | 4bc6cb45c326 |
comparison
equal
deleted
inserted
replaced
55419:738233cdd3b0 | 55420:c44f9de543e3 |
---|---|
35 (require 'cl) | 35 (require 'cl) |
36 (require 'custom) | 36 (require 'custom) |
37 ;; Emacs 19.34 compatibility hack -- is this needed? | 37 ;; Emacs 19.34 compatibility hack -- is this needed? |
38 (or (>= emacs-major-version 20) | 38 (or (>= emacs-major-version 20) |
39 (load "cl-seq"))) | 39 (load "cl-seq"))) |
40 | |
41 ;; Avoid byte-compiler warnings if the byte-compiler supports this. | |
42 ;; Currently, XEmacs supports this. | |
43 (eval-when-compile | |
44 (when (fboundp 'byte-compiler-options) | |
45 (let (unused-vars) ; Pacify Emacs byte-compiler | |
46 (defalias 'warnings 'identity) ; Pacify Emacs byte-compiler | |
47 (byte-compiler-options (warnings (- unused-vars)))))) | |
48 | |
49 ;; XEmacs byte-compiler raises warning abouts `last-coding-system-used'. | |
50 (eval-when-compile | |
51 (unless (boundp 'last-coding-system-used) | |
52 (defvar last-coding-system-used nil))) | |
40 | 53 |
41 ;; Define SMB method ... | 54 ;; Define SMB method ... |
42 (defcustom tramp-smb-method "smb" | 55 (defcustom tramp-smb-method "smb" |
43 "*Method to connect SAMBA and M$ SMB servers." | 56 "*Method to connect SAMBA and M$ SMB servers." |
44 :group 'tramp | 57 :group 'tramp |
143 (file-readable-p . tramp-smb-handle-file-exists-p) | 156 (file-readable-p . tramp-smb-handle-file-exists-p) |
144 (file-regular-p . tramp-handle-file-regular-p) | 157 (file-regular-p . tramp-handle-file-regular-p) |
145 (file-symlink-p . tramp-smb-not-handled) | 158 (file-symlink-p . tramp-smb-not-handled) |
146 ;; `file-truename' performed by default handler | 159 ;; `file-truename' performed by default handler |
147 (file-writable-p . tramp-smb-handle-file-writable-p) | 160 (file-writable-p . tramp-smb-handle-file-writable-p) |
148 ;; `find-backup-file-name' performed by default handler | 161 (find-backup-file-name . tramp-handle-find-backup-file-name) |
149 ;; `find-file-noselect' performed by default handler | 162 ;; `find-file-noselect' performed by default handler |
150 ;; `get-file-buffer' performed by default handler | 163 ;; `get-file-buffer' performed by default handler |
151 (insert-directory . tramp-smb-handle-insert-directory) | 164 (insert-directory . tramp-smb-handle-insert-directory) |
152 (insert-file-contents . tramp-handle-insert-file-contents) | 165 (insert-file-contents . tramp-handle-insert-file-contents) |
153 (load . tramp-handle-load) | 166 (load . tramp-handle-load) |