Re: ange-ftp save-buffer bug in 21.2

[Richard Stallman]

The problem is evidently because of the following code in
ange-ftp-write-region.

                (let ((executing-kbd-macro t)
                      (filename (buffer-file-name))
                      (mod-p (buffer-modified-p)))
                  (unwind-protect
                      (progn
                        (ange-ftp-real-write-region start end temp nil visit)
                        (setq coding-system-used last-coding-system-used))

Does anyone see a purpose for binding executing-kbd-macro here?  The
code to bind it has been that way for a long, long time.