[Emacs-diffs] Changes to emacs/lispref/files.texi

[Miles Bader]

Index: emacs/lispref/files.texi
diff -c emacs/lispref/files.texi:1.46 emacs/lispref/files.texi:1.47
*** emacs/lispref/files.texi:1.46       Wed Oct 23 05:34:45 2002
--- emacs/lispref/files.texi    Tue Feb  4 09:47:53 2003
***************
*** 1,7 ****
  @c -*-texinfo-*-
  @c This is part of the GNU Emacs Lisp Reference Manual.
  @c Copyright (C) 1990, 1991, 1992, 1993, 1994, 1995, 1998, 1999
! @c   Free Software Foundation, Inc. 
  @c See the file elisp.texi for copying conditions.
  @setfilename ../info/files
  @node Files, Backups and Auto-Saving, Documentation, Top
--- 1,7 ----
  @c -*-texinfo-*-
  @c This is part of the GNU Emacs Lisp Reference Manual.
  @c Copyright (C) 1990, 1991, 1992, 1993, 1994, 1995, 1998, 1999
! @c   Free Software Foundation, Inc.
  @c See the file elisp.texi for copying conditions.
  @setfilename ../info/files
  @node Files, Backups and Auto-Saving, Documentation, Top
***************
*** 92,98 ****
  
  @deffn Command find-file filename &optional wildcards
  This command selects a buffer visiting the file @var{filename},
! using an existing buffer if there is one, and otherwise creating a 
  new buffer and reading the file into it.  It also returns that buffer.
  
  The body of the @code{find-file} function is very simple and looks
--- 92,98 ----
  
  @deffn Command find-file filename &optional wildcards
  This command selects a buffer visiting the file @var{filename},
! using an existing buffer if there is one, and otherwise creating a
  new buffer and reading the file into it.  It also returns that buffer.
  
  The body of the @code{find-file} function is very simple and looks
***************
*** 548,554 ****
  
  If @var{mustbenew} is address@hidden, then @code{write-region} asks
  for confirmation if @var{filename} names an existing file.
! Starting in Emacs 21, if @var{mustbenew} is the symbol @code{excl}, 
  then @code{write-region} does not ask for confirmation, but instead
  it signals an error @code{file-already-exists} if the file already
  exists.
--- 548,554 ----
  
  If @var{mustbenew} is address@hidden, then @code{write-region} asks
  for confirmation if @var{filename} names an existing file.
! Starting in Emacs 21, if @var{mustbenew} is the symbol @code{excl},
  then @code{write-region} does not ask for confirmation, but instead
  it signals an error @code{file-already-exists} if the file already
  exists.
***************
*** 865,871 ****
  may be a nonexistent file name.
  
  If the file @var{filename} is not a symbolic link (or there is no such file),
! @code{file-symlink-p} returns @code{nil}.  
  
  @example
  @group
--- 865,871 ----
  may be a nonexistent file name.
  
  If the file @var{filename} is not a symbolic link (or there is no such file),
! @code{file-symlink-p} returns @code{nil}.
  
  @example
  @group
***************
*** 1107,1117 ****
  @example
  @group
  (file-attributes "files.texi")
!      @result{}  (nil 1 2235 75 
!           (8489 20284) 
!           (8489 20284) 
            (8489 20285)
!           14906 "-rw-rw-rw-" 
            nil 129500 -32252)
  @end group
  @end example
--- 1107,1117 ----
  @example
  @group
  (file-attributes "files.texi")
!      @result{}  (nil 1 2235 75
!           (8489 20284)
!           (8489 20284)
            (8489 20285)
!           14906 "-rw-rw-rw-"
            nil 129500 -32252)
  @end group
  @end example
***************
*** 1530,1536 ****
  @end defun
  
  @ignore
! Andrew Innes says that this 
  
  @c @defvar directory-sep-char
  @c @tindex directory-sep-char
--- 1530,1536 ----
  @end defun
  
  @ignore
! Andrew Innes says that this
  
  @c @defvar directory-sep-char
  @c @tindex directory-sep-char
***************
*** 1974,1985 ****
  @example
  @group
  (file-name-all-completions "f" "")
!      @result{} ("foo" "file~" "file.c.~2~" 
                  "file.c.~1~" "file.c")
  @end group
  
  @group
! (file-name-all-completions "fo" "")  
       @result{} ("foo")
  @end group
  @end example
--- 1974,1985 ----
  @example
  @group
  (file-name-all-completions "f" "")
!      @result{} ("foo" "file~" "file.c.~2~"
                  "file.c.~1~" "file.c")
  @end group
  
  @group
! (file-name-all-completions "fo" "")
       @result{} ("foo")
  @end group
  @end example
***************
*** 2126,2132 ****
  @group
  (directory-files "~lewis")
       @result{} ("#foo#" "#foo.el#" "." ".."
!          "dired-mods.el" "files.texi" 
           "files.texi.~1~")
  @end group
  @end example
--- 2126,2132 ----
  @group
  (directory-files "~lewis")
       @result{} ("#foo#" "#foo.el#" "." ".."
!          "dired-mods.el" "files.texi"
           "files.texi.~1~")
  @end group
  @end example
***************
*** 2388,2394 ****
          @dots{}
          ;; @r{Handle any operation we don't know about.}
          (t (let ((inhibit-file-name-handlers
!                   (cons 'my-file-handler 
                          (and (eq inhibit-file-name-operation operation)
                               inhibit-file-name-handlers)))
                   (inhibit-file-name-operation operation))
--- 2388,2394 ----
          @dots{}
          ;; @r{Handle any operation we don't know about.}
          (t (let ((inhibit-file-name-handlers
!                   (cons 'my-file-handler
                          (and (eq inhibit-file-name-operation operation)
                               inhibit-file-name-handlers)))
                   (inhibit-file-name-operation operation))