浏览代码

Agenda: Improve prompt message for agenda view menu

Patch by Eric Fraga
Carsten Dominik 15 年之前
父节点
当前提交
e4029c5b36
共有 2 个文件被更改,包括 6 次插入2 次删除
  1. 3 0
      lisp/ChangeLog
  2. 3 2
      lisp/org-agenda.el

+ 3 - 0
lisp/ChangeLog

@@ -1,5 +1,8 @@
 2010-02-01  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org-agenda.el (org-agenda-view-mode-dispatch): Improve the
+	prompt message.
+
 	* org-html.el (org-html-level-start): Use the
 	`html-container-class' text property to set an additional class
 	for an outline container.

+ 3 - 2
lisp/org-agenda.el

@@ -5515,8 +5515,9 @@ With prefix ARG, go backward that many times the current span."
 (defun org-agenda-view-mode-dispatch ()
   "Call one of the view mode commands."
   (interactive)
-  (message "View: [d]ay [w]eek [m]onth [y]ear [l]og [L]og-all [a]rch-trees [A]rch-files
-       clock[R]eport   time[G]rid   [[]inactive  [E]ntryText   include[D]iary")
+  (message "View: [d]ay [w]eek [m]onth [y]ear                         [q]uit/abort
+      time[G]rid     [[]inactive [f]ollow [l]og [L]og-all   [E]ntryText
+      [a]rch-trees   [A]rch-files    clock[R]eport   include[D]iary")
   (let ((a (read-char-exclusive)))
     (case a
       (?d (call-interactively 'org-agenda-day-view))