From: Chong Yidong <cyd@gnu.org>
Date: Mon, 23 Dec 2013 04:07:01 +0000 (+0800)
Subject: * indent.el (indent-rigidly): Use substitute-command-keys.
X-Git-Tag: emacs-24.3.90~173^2^2~42^2~45^2~387^2~234
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7510b0219cb36b49032393c5295f14efd0c8df2f;p=emacs.git

* indent.el (indent-rigidly): Use substitute-command-keys.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 06d2a8270a8..963fd58dbed 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -12,6 +12,8 @@
 	* calendar/todo-mode.el (todo-insert-item--next-param):
 	* progmodes/f90.el (f90-abbrev-start): Callers changed.
 
+	* indent.el (indent-rigidly): Use substitute-command-keys.
+
 2013-12-22  Kenjiro NAKAYAMA <nakayamakenjiro@gmail.com>
 
 	* net/eww.el (eww-tag-select): Add text-property to jump to next
diff --git a/lisp/indent.el b/lisp/indent.el
index b70414a850d..db7662496ff 100644
--- a/lisp/indent.el
+++ b/lisp/indent.el
@@ -194,8 +194,9 @@ indentation by specifying a large negative ARG."
   (interactive "r\nP\np")
   (if (and (not arg) interactive)
       (progn
-        (message "Edit region indentation with <left>, <right>, <S-left> \
-and <S-right>.")
+        (message
+	 (substitute-command-keys
+	  "Indent region with \\<indent-rigidly-map>\\[indent-rigidly-left], \\[indent-rigidly-right], \\[indent-rigidly-left-to-tab-stop], or \\[indent-rigidly-right-to-tab-stop]."))
         (set-transient-map indent-rigidly-map t))
     (save-excursion
       (goto-char end)