summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPaul Eggert <eggert@cs.ucla.edu>2020-05-17 16:50:49 -0700
committerKyle Meyer <kyle@kyleam.com>2020-05-21 20:51:38 -0400
commit1e3184964c6f5b37079c8b1c4fd543e8d3f693b3 (patch)
tree23f444c94e2ee45a24a34256707ed561bdd33917
parentbfc4569ae326a40ac77ea89dffdbfdfaabc6ec0d (diff)
downloadorg-mode-1e3184964c6f5b37079c8b1c4fd543e8d3f693b3.tar.gz
Backport commit 00be23c2a from Emacs
* lisp/org-agenda.el (org-agenda-get-restriction-and-command): Don’t try to modify string constants. Don’t attempt to modify constant strings 00be23c2af4aa1bb09afc6404c5ef68997dc18f5 Paul Eggert Sun May 17 16:51:46 2020 -0700
-rw-r--r--lisp/org-agenda.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el
index 8ed5e40..ab13f92 100644
--- a/lisp/org-agenda.el
+++ b/lisp/org-agenda.el
@@ -3018,7 +3018,8 @@ Agenda views are separated by `org-agenda-block-separator'."
(erase-buffer)
(insert (eval-when-compile
(let ((header
- "Press key for an agenda command:
+ (copy-sequence
+ "Press key for an agenda command:
-------------------------------- < Buffer, subtree/region restriction
a Agenda for current week or day > Remove restriction
t List of all TODO entries e Export agenda views
@@ -3027,7 +3028,7 @@ s Search for keywords M Like m, but only TODO entries
/ Multi-occur S Like s, but only TODO entries
? Find :FLAGGED: entries C Configure custom agenda commands
* Toggle sticky agenda views # List stuck projects (!=configure)
-")
+"))
(start 0))
(while (string-match
"\\(^\\| \\|(\\)\\(\\S-\\)\\( \\|=\\)"