(backup-buffer): Delete `ange-ftp' property.

This is not a handled operation.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d98f5b82a75967f765583d7c63e51f87d0cb86b3..5e4bd5ed83ec72d913d6d88509475e715fc5a9d3 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-06-21  Kai Gro\e,b_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
+
+       * net/ange-ftp.el (backup-buffer): Delete `ange-ftp' property.
+       This is not a handled operation.
+
 2002-06-21  Kim F. Storm  <storm@filanet.dk>
 
        * emulation/cua-base.el (cua--prefix-arg): Make register prefixes

diff --git a/lisp/net/ange-ftp.el b/lisp/net/ange-ftp.el
index 1dfc6927166d67cba8f6c2b2f01aa6dc3ca92d4a..1115b18f940c7f42f3549917a010e952714c6391 100644 (file)
--- a/lisp/net/ange-ftp.el
+++ b/lisp/net/ange-ftp.el
@@ -4395,7 +4395,6 @@ NEWNAME should be the name to give the new compressed or uncompressed file.")
      'ange-ftp-verify-visited-file-modtime)
 (put 'file-exists-p 'ange-ftp 'ange-ftp-file-exists-p)
 (put 'write-region 'ange-ftp 'ange-ftp-write-region)
-(put 'backup-buffer 'ange-ftp 'ange-ftp-backup-buffer)
 (put 'copy-file 'ange-ftp 'ange-ftp-copy-file)
 (put 'rename-file 'ange-ftp 'ange-ftp-rename-file)
 (put 'file-attributes 'ange-ftp 'ange-ftp-file-attributes)