]> git.eshelyaron.com Git - emacs.git/commitdiff
* lisp/simple.el (minibuffer-default-add-shell-commands): Require 'dired-aux'.
authorJuri Linkov <juri@linkov.net>
Fri, 1 Dec 2023 07:18:28 +0000 (09:18 +0200)
committerJuri Linkov <juri@linkov.net>
Fri, 1 Dec 2023 07:18:28 +0000 (09:18 +0200)
This is necessary for 'shell-command-guess' after removing autoload cookie
since declare-function doesn't autoload it.

lisp/simple.el

index 0fbab6cfa890fa16e9469c03b24b621240cf7251..652fc7ba540f89d6ecc3a363fd3a6380c32e7ad6 100644 (file)
@@ -4284,7 +4284,8 @@ after the default value."
   (let* ((filename (if (listp minibuffer-default)
                       (car minibuffer-default)
                     minibuffer-default))
-        (commands (and filename (shell-command-guess (list filename)))))
+        (commands (and filename (require 'dired-aux)
+                        (shell-command-guess (list filename)))))
     (setq commands (mapcar (lambda (command)
                             (concat command " " filename))
                           commands))