From e0db2366e7a4bd0719b8a0e7899f294243a6c946 Mon Sep 17 00:00:00 2001 From: Lars Hansen Date: Sun, 25 Jul 2004 19:55:21 +0000 Subject: [PATCH] (wdired-finish-edit): Require dired-aux before locally binding dired-backup-overwrite. --- lisp/ChangeLog | 5 +++++ lisp/wdired.el | 5 +++++ 2 files changed, 10 insertions(+) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 65648fbf3cb..73c833245f8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2004-07-25 Lars Hansen + + * wdired.el (wdired-finish-edit): Require dired-aux before locally + binding dired-backup-overwrite. + 2004-07-25 John Paul Wallington * subr.el (butlast, event-modifiers, event-basic-type): Doc fixes. diff --git a/lisp/wdired.el b/lisp/wdired.el index 30ba2a3cd45..928ecd65339 100644 --- a/lisp/wdired.el +++ b/lisp/wdired.el @@ -455,6 +455,11 @@ non-nil means return old filename." (setq file-new (substitute-in-file-name file-new)) (if wdired-use-interactive-rename (wdired-search-and-rename file-ori file-new) + ;; If dired-rename-file autoloads dired-aux while + ;; dired-backup-overwrite is locally bound, + ;; dired-backup-overwrite won't be initialized. + ;; So we must ensure dired-aux is loaded. + (require 'dired-aux) (condition-case err (let ((dired-backup-overwrite nil)) (dired-rename-file file-ori file-new -- 2.39.2