[Emacs-diffs] Changes to emacs/lisp/files.el

[Richard M. Stallman]

Index: emacs/lisp/files.el
diff -c emacs/lisp/files.el:1.601 emacs/lisp/files.el:1.602
*** emacs/lisp/files.el:1.601   Thu Aug 15 16:08:24 2002
--- emacs/lisp/files.el Fri Aug 23 22:57:31 2002
***************
*** 445,450 ****
--- 445,451 ----
  (defvar view-read-only nil
    "*Non-nil means buffers visiting files read-only, do it in view mode.")
  
+ (put 'ange-ftp-completion-hook-function 'safe-magic t)
  (defun ange-ftp-completion-hook-function (op &rest args)
    "Provides support for ange-ftp host name completion.
  Runs the usual ange-ftp hook, but only for completion operations."