[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[nongnu] elpa/helm c9efe654a6 3/3: Fix wdired by advice up to emacs-28.1
From: |
ELPA Syncer |
Subject: |
[nongnu] elpa/helm c9efe654a6 3/3: Fix wdired by advice up to emacs-28.1 |
Date: |
Tue, 23 Aug 2022 13:58:53 -0400 (EDT) |
branch: elpa/helm
commit c9efe654a6362cbc4a2fdcc5fdcad94a967dd371
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>
Fix wdired by advice up to emacs-28.1
---
helm-files.el | 8 ++++++--
1 file changed, 6 insertions(+), 2 deletions(-)
diff --git a/helm-files.el b/helm-files.el
index 1b64ccdba3..4ede240cef 100644
--- a/helm-files.el
+++ b/helm-files.el
@@ -3023,8 +3023,12 @@ and should be used carefully elsewhere, or not at all,
using
"Open a dired buffer with only marked files.
With a prefix arg toggle dired buffer to wdired mode."
- (advice-add 'wdired-finish-edit :override #'helm--advice-wdired-finish-edit)
- (advice-add 'wdired-get-filename :override
#'helm--advice-wdired-get-filename)
+ (when (< emacs-major-version 29)
+ ;; Fix emacs bug
+ ;; https://lists.gnu.org/archive/html/bug-gnu-emacs/2022-08/msg01994.html
+ ;; up to emacs-28.1 and should be fixed in emacs-29+.
+ (advice-add 'wdired-finish-edit :override
#'helm--advice-wdired-finish-edit)
+ (advice-add 'wdired-get-filename :override
#'helm--advice-wdired-get-filename))
(let* ((marked (helm-marked-candidates :with-wildcard t))
(current (car marked)))
(unless (and helm--url-regexp