/[emacs]/emacs/lisp/wdired.el
ViewVC logotype

Diff of /emacs/lisp/wdired.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by lh, Wed May 5 08:01:17 2004 UTC revision 1.5 by lh, Sun Jul 25 19:54:51 2004 UTC
# Line 455  non-nil means return old filename." Line 455  non-nil means return old filename."
455                    (setq file-new (substitute-in-file-name file-new))                    (setq file-new (substitute-in-file-name file-new))
456                    (if wdired-use-interactive-rename                    (if wdired-use-interactive-rename
457                        (wdired-search-and-rename file-ori file-new)                        (wdired-search-and-rename file-ori file-new)
458                        ;; If dired-rename-file autoloads dired-aux while
459                        ;; dired-backup-overwrite is locally bound,
460                        ;; dired-backup-overwrite won't be initialized.
461                        ;; So we must ensure dired-aux is loaded.
462                        (require 'dired-aux)
463                      (condition-case err                      (condition-case err
464                          (let ((dired-backup-overwrite nil))                          (let ((dired-backup-overwrite nil))
465                            (dired-rename-file file-ori file-new                            (dired-rename-file file-ori file-new

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26