Fix #1929: advice on non-existent functions

This commit is contained in:
Henrik Lissner 2020-02-29 11:29:25 -05:00
parent 5b094b6220
commit a4194c5746
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395

View file

@ -120,13 +120,13 @@ we have to clean it up ourselves."
(defvar +wdired-icons-enabled -1) (defvar +wdired-icons-enabled -1)
(defadvice! +dired-disable-icons-in-wdired-mode-a (&rest _) (defadvice! +dired-disable-icons-in-wdired-mode-a (&rest _)
:before #'+wdired-before-start-advice :before #'wdired-change-to-wdired-mode
(setq-local +wdired-icons-enabled (if all-the-icons-dired-mode 1 -1)) (setq-local +wdired-icons-enabled (if all-the-icons-dired-mode 1 -1))
(when all-the-icons-dired-mode (when all-the-icons-dired-mode
(all-the-icons-dired-mode -1))) (all-the-icons-dired-mode -1)))
(defadvice! +dired-restore-icons-after-wdired-mode-a (&rest _) (defadvice! +dired-restore-icons-after-wdired-mode-a (&rest _)
:after #'+wdired-after-finish-advice :after #'wdired-change-to-dired-mode
(all-the-icons-dired-mode +wdired-icons-enabled)))) (all-the-icons-dired-mode +wdired-icons-enabled))))