* lisp/dired.el (dired-summary): Use substitute-command-keys.

(cherry picked from commit 16eb038d472b5765beb3b18e1058846efbdf97af)

diff --git a/lisp/dired.el b/lisp/dired.el
index 18a2c375923ac6d1fddd735f9d643b2c1238a1b2..f7e96593b298be909be8fa01c54e46fc39daba39 100644 (file)
--- a/lisp/dired.el
+++ b/lisp/dired.el
@@ -2840,7 +2840,9 @@ Keybindings:
   ;; FIXME this should check the key-bindings and use
   ;; substitute-command-keys if non-standard
   (message
-   "d-elete, u-ndelete, x-punge, f-ind, o-ther window, R-ename, C-opy, h-elp"))
+   (substitute-command-keys
+    (concat "\\`d'-elete, \\`u'-ndelete, \\`x'-punge, \\`f'-ind, "
+            "\\`o'-ther window, \\`R'-ename, \\`C'-opy, \\`h'-elp"))))
 
 (defun dired-undo ()
   "Undo in a Dired buffer.