From 6de40a0c9ed9865cfee706749987a5e162e207cb Mon Sep 17 00:00:00 2001 From: Juanma Barranquero Date: Mon, 11 Nov 2002 11:44:24 +0000 Subject: [PATCH] (dired-show-file-type): Format filename with "%s" to escape any format-like sequences it could contain. --- lisp/ChangeLog | 5 +++++ lisp/dired-aux.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index aefa123399d..a2f8ce2bb09 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-11-11 Fabrice Bauzac (tiny change) + + * dired-aux.el (dired-show-file-type): Format filename with "%s" to + escape any format-like sequences it could contain. + 2002-11-11 Per Abrahamsen * cus-edit.el (custom-save-delete): Force emacs-lisp-mode. diff --git a/lisp/dired-aux.el b/lisp/dired-aux.el index c20888f7da1..09ad9f9a677 100644 --- a/lisp/dired-aux.el +++ b/lisp/dired-aux.el @@ -2033,7 +2033,7 @@ true then the type of the file linked to by FILE is printed instead." (call-process "file" nil t t "--" file)) (when (bolp) (backward-delete-char 1)) - (message (buffer-string)))) + (message "%s" (buffer-string)))) (provide 'dired-aux) -- 2.39.2