Browse Source

org-agenda: Fix the display of more key substitutions

* lisp/org-agenda.el (org-todo-list):
(org-tags-view): Specify the keymap for the substitute-command-keys
call because, as of b6c5a174d, this call is made outside of the agenda
buffer.

The substitute-command-keys call in org-search-view is already taken
care of by 48f333805.
Kyle Meyer 7 years ago
parent
commit
33ca07b5df
1 changed files with 3 additions and 2 deletions
  1. 3 2
      lisp/org-agenda.el

+ 3 - 2
lisp/org-agenda.el

@@ -4710,7 +4710,7 @@ for a keyword.  A numeric prefix directly selects the Nth keyword in
 	  (setq pos (point))
 	  (unless org-agenda-multi
 	    (insert (substitute-command-keys "Available with \
-`N \\[org-agenda-redo]': (0)[ALL]"))
+\\<org-agenda-mode-map>`N \\[org-agenda-redo]': (0)[ALL]"))
 	    (let ((n 0))
               (dolist (k kwds)
                 (let ((s (format "(%d)%s" (cl-incf n) k)))
@@ -4810,7 +4810,8 @@ The prefix arg TODO-ONLY limits the search to TODO entries."
 	  (setq pos (point))
 	  (unless org-agenda-multi
 	    (insert (substitute-command-keys
-		     "Press `\\[universal-argument] \\[org-agenda-redo]' \
+		     "Press \
+\\<org-agenda-mode-map>`\\[universal-argument] \\[org-agenda-redo]' \
 to search again with new search string\n")))
 	  (add-text-properties pos (1- (point))
 			       (list 'face 'org-agenda-structure))