[PATCH] void-function tramp-sh-handle-find-backup-file-name

[PATCH] void-function tramp-sh-handle-find-backup-file-name

[Sascha Wilde]

[-- Attachment #1: Type: text/plain, Size: 427 bytes --]

Hi *,

on Mon Oct 04 21:44:08 2010 +0200 Michael Albinus made a commit
"Continue reorganization of load dependencies. (Bug#7156)"
in which (I suspect accidentally) the associated function for
find-backup-file-name was changed to
tramp-sh-handle-find-backup-file-name in
tramp-sh-file-name-handler-alist.

As tramp-sh-handle-find-backup-file-name is undefined this results in
errors...

This patch reverts this specific change:

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: tramp-handle-find-backup-file-name.patch --]
[-- Type: text/x-patch, Size: 679 bytes --]

diff -r 8216f0b940f7 lisp/net/tramp-sh.el
--- a/lisp/net/tramp-sh.el	Wed Oct 06 16:12:42 2010 +0900
+++ b/lisp/net/tramp-sh.el	Wed Oct 06 13:56:55 2010 +0200
@@ -912,7 +912,7 @@
     (insert-file-contents-literally
      . tramp-sh-handle-insert-file-contents-literally)
     (write-region . tramp-sh-handle-write-region)
-    (find-backup-file-name . tramp-sh-handle-find-backup-file-name)
+    (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)

[-- Attachment #3: Type: text/plain, Size: 75 bytes --]


cheers
sascha
-- 
Sascha Wilde
Life's too short to read boring signatures

Re: [PATCH] void-function tramp-sh-handle-find-backup-file-name

[Michael Albinus]

Sascha Wilde <wilde@sha-bang.de> writes:

> Hi *,

Hi Sascha,

> This patch reverts this specific change:
> diff -r 8216f0b940f7 lisp/net/tramp-sh.el
> --- a/lisp/net/tramp-sh.el	Wed Oct 06 16:12:42 2010 +0900
> +++ b/lisp/net/tramp-sh.el	Wed Oct 06 13:56:55 2010 +0200
> @@ -912,7 +912,7 @@
>      (insert-file-contents-literally
>       . tramp-sh-handle-insert-file-contents-literally)
>      (write-region . tramp-sh-handle-write-region)
> -    (find-backup-file-name . tramp-sh-handle-find-backup-file-name)
> +    (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)

Thanks for the patch. Some minutes ago, I have committed exactly the
same, being alerted by another message on emacs-devel. Sorry for the
inconvenience.

> cheers
> sascha

Best regards, Michael.