(find-alternate-file-other-window, find-alternate-file):
authorStefan Monnier <monnier@iro.umontreal.ca>
Sun, 5 Jul 2009 22:15:34 +0000 (22:15 +0000)
committerStefan Monnier <monnier@iro.umontreal.ca>
Sun, 5 Jul 2009 22:15:34 +0000 (22:15 +0000)
Obey confirm-nonexistent-file-or-buffer.

lisp/ChangeLog
lisp/files.el

index 06ec006..92f6b62 100644 (file)
@@ -1,16 +1,20 @@
+2009-07-05  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * files.el (find-alternate-file-other-window, find-alternate-file):
+       Obey confirm-nonexistent-file-or-buffer.
+
 2009-07-05  Michael Albinus  <michael.albinus@gmx.de>
 
        * dired-aux.el (dired-show-file-type): Handle remote files.
 
 2009-03-22  Jari Aalto  <jari.aalto@cante.net>
 
-        * desktop.el (desktop-globals-to-save): Add
-       file-name-history (Bug#2750).
+       * desktop.el (desktop-globals-to-save):
+       Add file-name-history (Bug#2750).
 
 2009-07-05  Chong Yidong  <cyd@stupidchicken.com>
 
-       * add-log.el (add-log-current-defun-header-regexp): Doc
-       fix (Bug#2217).
+       * add-log.el (add-log-current-defun-header-regexp): Doc fix (Bug#2217).
 
 2009-07-04  Johan Bockgård  <bojohan@gnu.org>
 
@@ -29,7 +33,7 @@
 
 2009-07-03  Jan Djärv  <jan.h.d@swipnet.se>
 
-       * cus-start.el (all): Added make-pointer-invisible.
+       * cus-start.el (all): Add make-pointer-invisible.
 
 2009-07-03  Jay Belanger  <jay.p.belanger@gmail.com>
 
        (add-to-list)<Info-virtual-nodes>: Add "\\`\\*TOC\\*\\'".
        (Info-toc): Move part of code to `Info-toc-find-node'.
        (Info-toc-find-node): New function.
-       (Info-toc-insert): Renamed from `Info-insert-toc'.  Don't insert
+       (Info-toc-insert): Rename from `Info-insert-toc'.  Don't insert
        the current Info file name to references because now the node
        "*TOC*" belongs to the same Info manual.
-       (Info-toc-build): Renamed from `Info-build-toc'.
+       (Info-toc-build): Rename from `Info-build-toc'.
        (Info-toc-nodes): Rename input argument `file' to `filename'.
        Use Info-virtual-fun, Info-virtual-call and Info-virtual-file-p
        instead of ad-hoc processing of ("dir" apropos history toc).
 2009-07-02  Michael Albinus  <michael.albinus@gmx.de>
 
        * net/tramp-gvfs.el (tramp-gvfs-handler-mounted-unmounted)
-       (tramp-gvfs-connection-mounted-p): Handle changed mount-info
-       interface.
+       (tramp-gvfs-connection-mounted-p): Handle changed mount-info interface.
 
 2009-07-02  Kenichi Handa  <handa@m17n.org>
 
 
 2009-07-01  Michael Albinus  <michael.albinus@gmx.de>
 
-       * net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist): Add
-       handler for `process-file', `shell-command' and
+       * net/tramp-gvfs.el (tramp-gvfs-file-name-handler-alist):
+       Add handler for `process-file', `shell-command' and
        `start-file-process'.
        (tramp-gvfs-handle-shell-command)
        (tramp-gvfs-handle-start-file-process)
        (tramp-gvfs-handle-process-file): New defuns.
-       (tramp-synce-list-devices): Simplify check for existence of
-       property.
+       (tramp-synce-list-devices): Simplify check for existence of property.
 
 2009-07-01  Jan Djärv  <jan.h.d@swipnet.se>
 
 
 2009-06-30  Michael Albinus  <michael.albinus@gmx.de>
 
-       * net/tramp.el (tramp-do-copy-or-rename-file-directly): Handle
-       also the 'rename case, when setting file modes.  (Bug#3712)
+       * net/tramp.el (tramp-do-copy-or-rename-file-directly):
+       Handle also the 'rename case, when setting file modes.  (Bug#3712)
        (tramp-default-file-modes) Remove execute permissions.
 
        * net/tramp-gvfs.el (tramp-gvfs-methods): Add "synce" method.
        (top): Add a default for "synce" in `tramp-default-user-alist'.
        Add completion function for "synce" method.
        (tramp-hal-service, tramp-hal-path-manager)
-       (tramp-hal-interface-manager, tramp-hal-interface-device): New
-       defconst.
-       (tramp-gvfs-connection-mounted-p): Handle empty user name for
-       synce.
-       (tramp-synce-list-devices, tramp-synce-parse-device-names): New
-       defuns.
+       (tramp-hal-interface-manager, tramp-hal-interface-device):
+       New defconst.
+       (tramp-gvfs-connection-mounted-p): Handle empty user name for synce.
+       (tramp-synce-list-devices, tramp-synce-parse-device-names):
+       New defuns.
 
        * net/trampver.el: Update release number.
 
        * international/fontset.el (setup-default-fontset): Add CJK fonts
        for symbols and the other miscellaneous characters.
 
-       * language/korea-util.el (setup-korean-environment-internal): Make
-       char-widht-table suitable for Korean environments.
+       * language/korea-util.el (setup-korean-environment-internal):
+       Make char-width-table suitable for Korean environments.
        (exit-korean-environment): Cancel above.
 
        * language/chinese.el ("Chinese-GB", "Chinese-BIG5")
 2009-06-29  Alan Mackenzie  <acm@muc.de>
 
        * progmodes/cc-cmds.el (c-mask-paragraph): Remove a spurious
-       correction between the visible width of TABs and their number of
-       bytes.
+       correction between the visible width of TABs and their number of bytes.
 
 2009-06-29  Chong Yidong  <cyd@stupidchicken.com>
 
 2009-06-28  Michael McNamara  <mac@mail.brushroad.com>
 
        * verilog-mode.el (verilog-beg-of-statement)
-       (verilog-endcomment-reason-re): Support unique case and priority
-       case.
+       (verilog-endcomment-reason-re): Support unique case and priority case.
        (verilog-basic-complete-re): Support localparam lineup.
        (verilog-beg-of-statement-1): Fix for robustness, unique case.
        (verilog-set-auto-endcomments): Fix for unique case, always_comb
        priority case statements.
        (verilog-auto-lineup): Make just declarations the default (as it
        had been).
-       (verilog-leap-to-case-head): Support priority/unique case
-       statements.
+       (verilog-leap-to-case-head): Support priority/unique case statements.
        (verilog-auto-lineup): Rework to give users radio buttons to
        select the various styles of automatic lineup
        (verilog-error-regexp-alist): Rework to support the XEmacs style
 
 2009-06-28  Wilson Snyder  <wsnyder@wsnyder.org>
 
-       * verilog-mode.el (verilog-auto-arg, verilog-auto-arg-sort): Allow
-       sorting AUTOARG lists.  Suggested by Andrea Fedeli.
+       * verilog-mode.el (verilog-auto-arg, verilog-auto-arg-sort):
+       Allow sorting AUTOARG lists.  Suggested by Andrea Fedeli.
        (verilog-read-sub-decls-line): Fix AUTOWIRE signals getting lost
        in concatenations.  Reported by Yishay Belkind.
        (verilog-auto-ascii-enum): Support one-hot state machines in
        (verilog-make-width-expression): Simplify [A-1:0] expression
        widths to just {A{1'b0}}.
        (verilog-mode): Cleanup checkdoc warnings.
-       (verilog-auto-inout-module, verilog-signals-matching-dir-re): Add
-       third optional regexp to AUTOINOUTMODULE to allow selecting only
+       (verilog-auto-inout-module, verilog-signals-matching-dir-re):
+       Add third optional regexp to AUTOINOUTMODULE to allow selecting only
        inputs/outputs or data type.  Suggested by Vasu Kandadi.
        (next-error-last-buffer): Fix byte-compiler warning.
        (verilog-auto, verilog-auto-insert-lisp, verilog-auto-inst)
        (verilog-delete-auto): Add AUTOINSERTLISP to insert arbitrary lisp
-       or shell command text during AUTO expansion.  Suggested by Tad
-       Truex.
+       or shell command text during AUTO expansion.  Suggested by Tad Truex.
        (verilog-read-sub-decls-expr, verilog-read-sub-decls-line)
-       (verilog-read-sub-decls-sig, verilog-symbol-detick-text): Fix
-       dotted nets {a.b,c.d} and excaped identifiers being mis-included
+       (verilog-read-sub-decls-sig, verilog-symbol-detick-text):
+       Fix dotted nets {a.b,c.d} and excaped identifiers being mis-included
        in AUTOINOUT. Reported by Matthew Lovell.
        (verilog-read-always-signals-recurse): Fix AUTORESET "if (a<=b)"
        causing use of <= assignments.  Reported by Alex Reed.
        recognized by AUTOWIRE.  Reported by Spencer Isaacson.
        (verilog-extended-complete-re): Support import "DPI-C" functions.
        (verilog-read-always-signals-recurse): Fix AUTORESET of "x <=
-       y[a+1:a+1]" to not include a in reset list.  Reported by Dan
-       Dever.
+       y[a+1:a+1]" to not include a in reset list.  Reported by Dan Dever.
        (verilog-insert-date, verilog-insert-year)
        (verilog-sk-header-tmpl): Fix verilog-header inserting error on
        Windows systems.  Reported by Michael Potts.
        AUTOINSTPARAM.  Reported by Bruce T.
        (verilog-goto-defun): Fix goto not finding modules unless first
        perform a verilog-auto expansion. Suggested by Lawrence Butcher.
-        (verilog-mode): Expand -f flag arguments on entry to mode so
+       (verilog-mode): Expand -f flag arguments on entry to mode so
        verilog-goto-defun will work.  Reported by Lawrence Butcher.
        (verilog-getopt): Expand environment variables in -f file
        arguments.  Suggested by Lawrence Butcher.
-        (verilog-set-define): Fix "Symbol's value as variable is void"
+       (verilog-set-define): Fix "Symbol's value as variable is void"
        when reading enumerations.
        (verilog-auto-ascii-enum): Fix duplicate labels in AUTOASCIIENUM.
        Suggested by Stephen Peltan.
-        (verilog-read-defines): Fix reading of enumerations in include
+       (verilog-read-defines): Fix reading of enumerations in include
        files.  Reported by Steve Peltan.
 
 2009-06-28  David De La Harpe Golden  <david@harpegolden.net>
        * textmodes/ispell.el: Add `ispell-looking-back' XEmacs
          compatibility function for `looking-back'
 
-       * textmodes/flyspell.el (sgml-mode-flyspell-verify): Use
-         `ispell-looking-back'
+       * textmodes/flyspell.el (sgml-mode-flyspell-verify):
+       Use `ispell-looking-back'
 
 2009-06-24  Michael Albinus  <michael.albinus@gmx.de>
 
        * vc-hooks.el (vc-stay-local-p, vc-state, vc-working-revision):
        Add an optional argument for the backend, use it instead of
        calling vc-backend.
-       (vc-mode-line): Add an optional argument for the backend.  Pass
-       the backend to vc-state and vc-working-revision.  Move code for
+       (vc-mode-line): Add an optional argument for the backend.
+       Pass the backend to vc-state and vc-working-revision.  Move code for
        special handling for vc-state being a buffer to ...
 
        * vc-rcs.el (vc-rcs-find-file-hook):
        (tramp-default-method): Use `tramp-compat-process-running-p'.
        (tramp-default-proxies-alist): Allow also Lisp forms.
        (tramp-remote-path): Add choice "Private Directories".
-       (tramp-wrong-passwd-regexp): Remove "Tramp connection closed"
-       option.
+       (tramp-wrong-passwd-regexp): Remove "Tramp connection closed" option.
        (tramp-domain-regexp): Allow also "-", "_" and ".".
        (tramp-end-of-output): Remove newlines, and add "$" at the end.
        (tramp-file-name-handler-alist): Add handler for `dired-uncache'.
        (tramp-debug-message): Insert header line in debug buffer.
-       (tramp-handle-directory-files-and-attributes-with-stat): Care
-       about filenames with spaces, or starting with "-".
+       (tramp-handle-directory-files-and-attributes-with-stat):
+       Care about filenames with spaces, or starting with "-".
        (tramp-handle-dired-uncache): New defun.
        (tramp-handle-insert-directory): Don't flush the directory from
        cache, this is handled by `dired-uncache' now.
        (tramp-find-shell, tramp-open-connection-setup-interactive-shell):
        Quote `tramp-end-of-output'.
        (tramp-action-password): Improve trace message.
-       (tramp-check-for-regexp): Both echoes must be present, before
-       removing.
-       (tramp-open-connection-setup-interactive-shell): Trace coding
-       system.
+       (tramp-check-for-regexp): Both echoes must be present, before removing.
+       (tramp-open-connection-setup-interactive-shell): Trace coding system.
        (tramp-compute-multi-hops): Eval cons cells of
        `tramp-default-proxies-alist'.
        (tramp-maybe-open-connection): Use the same command pattern for
        (tramp-split-string): Remove function.  It is handled in
        tramp-compat now.
 
-       * net/tramp-cmds.el (tramp-bug): Recommend
-       `tramp-cleanup-all-connections' in the bug mail.
+       * net/tramp-cmds.el (tramp-bug):
+       Recommend `tramp-cleanup-all-connections' in the bug mail.
 
        * net/tramp-compat.el (tramp-compat-split-string)
        (tramp-compat-process-running-p): New defuns.
 
        * net/tramp-gvfs.el: New package.
 
-       * net/tramp-smb.el (tramp-smb-file-name-handler-alist): Add
-       handler for `dired-uncache'.
+       * net/tramp-smb.el (tramp-smb-file-name-handler-alist):
+       Add handler for `dired-uncache'.
        (tramp-smb-handle-file-local-copy): Cleanup in case of error.
 
        * net/trampver.el: Update release number.  Make version check fit
index e2fe19c..10970aa 100644 (file)
@@ -1432,7 +1432,8 @@ expand wildcards (if any) and replace the file with multiple files."
            (setq file-name (file-name-nondirectory file)
                  file-dir (file-name-directory file)))
        (list (read-file-name
-             "Find alternate file: " file-dir nil nil file-name)
+             "Find alternate file: " file-dir nil
+              (confirm-nonexistent-file-or-buffer) file-name)
             t))))
   (if (one-window-p)
       (find-file-other-window filename wildcards)
@@ -1461,7 +1462,8 @@ killed."
          (setq file-name (file-name-nondirectory file)
                file-dir (file-name-directory file)))
      (list (read-file-name
-           "Find alternate file: " file-dir nil nil file-name)
+           "Find alternate file: " file-dir nil
+            (confirm-nonexistent-file-or-buffer) file-name)
           t)))
   (unless (run-hook-with-args-until-failure 'kill-buffer-query-functions)
     (error "Aborted"))