From: Michael Albinus <michael.albinus@gmx.de>
Date: Sun, 8 Nov 2009 10:49:06 +0000 (+0000)
Subject: * tramp.texi (Auto-save and Backup): Disable backups just for a
X-Git-Tag: emacs-pretest-23.1.90~522
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c7bd4ebeb5ee493baf78d844234e4d34a09c37e1;p=emacs.git

* tramp.texi (Auto-save and Backup): Disable backups just for a
method.
---

diff --git a/doc/misc/ChangeLog b/doc/misc/ChangeLog
index 5d08081ec00..d18dbea3b7f 100644
--- a/doc/misc/ChangeLog
+++ b/doc/misc/ChangeLog
@@ -1,3 +1,10 @@
+2009-11-08  Michael Albinus  <michael.albinus@gmx.de>
+
+	* tramp.texi (Auto-save and Backup): Disable backups just for a
+	method.
+
+	* trampver.texi: Update release number.
+
 2009-11-07  Michael Albinus  <michael.albinus@gmx.de>
 
 	Sync with Tramp 2.1.17.
diff --git a/doc/misc/tramp.texi b/doc/misc/tramp.texi
index 8b82c3638af..2c48fe32c55 100644
--- a/doc/misc/tramp.texi
+++ b/doc/misc/tramp.texi
@@ -2057,6 +2057,23 @@ for @value{tramp} files:
 @end lisp
 @end ifset
 
+@ifset emacs
+It is also possible to disable backups depending on the used method.
+The following code disables backups for the @option{su} and
+@option{sudo} methods:
+
+@lisp
+(setq backup-enable-predicate
+      (lambda (name)
+        (and (normal-backup-enable-predicate name)
+             (not
+              (let ((method (file-remote-p name 'method)))
+                (when (stringp method)
+                  (member method '("su" "sudo"))))))))
+@end lisp
+@end ifset
+
+
 Another possibility is to use the @value{tramp} variable
 @ifset emacs
 @code{tramp-backup-directory-alist}.