summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2012-05-05 09:57:30 +0200
committerBastien Guerry <bzg@altern.org>2012-05-05 09:57:30 +0200
commite508b497a393a3eeec9e332a9b86520ec9260a11 (patch)
treeeffd4916684787b3688506033479f0d07d4d2697
parent405eae04970519215e180cefb0e95962d4844e7e (diff)
downloadorg-mode-e508b497a393a3eeec9e332a9b86520ec9260a11.tar.gz
org-agenda.el (org-agenda-view-mode-dispatch): message more readable.
* org-agenda.el (org-agenda-view-mode-dispatch): Make the message more readable.
-rw-r--r--lisp/org-agenda.el7
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 245398e..56ae03b 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -6891,10 +6891,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 [SPC]reset [q]uit/abort
- time[G]rid [[]inactive [f]ollow [l]og [L]og-all [c]lockcheck
- [a]rch-trees [A]rch-files clock[R]eport include[D]iary
- [E]ntryText")
+ (message "View: [d]ay [w]eek [m]onth [y]ear [SPC]reset [q]uit/abort
+ time[G]rid [[]inactive [f]ollow [l]og [L]og-all [c]lockcheck
+ [a]rch-trees [A]rch-files clock[R]eport include[D]iary [E]ntryText")
(let ((a (read-char-exclusive)))
(case a
(?\ (call-interactively 'org-agenda-reset-view))