From 3e4f0fe522d0e7f844afa5beaa8339c9c1d9f645 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Tue, 23 Oct 2012 23:51:13 +0900 Subject: [PATCH] fix dired-get-file-info --- emacs.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/emacs.el b/emacs.el index a4e649b..364d936 100644 --- a/emacs.el +++ b/emacs.el @@ -1248,12 +1248,12 @@ delete; o: select other; j, l: enlarge; h, k: shrink; q: quit." (defun dired-get-file-info () "dired get file info" (interactive) - (let ((f (dired-get-filename))) + (let ((f (shell-quote-argument (dired-get-filename t)))) (if (file-directory-p f) (progn - (message "calculating du...") + (message "Calculating disk usage...") (shell-command (concat "du -hsD " - (shell-quote-argument f)))) + f))) (shell-command (concat "file " f)))))