mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2025-01-15 17:00:45 +00:00
Code

Avoid text properties on elements in custom variables

Browse Source
This commit is contained in:
Carsten Dominik 2009-08-14 17:18:14 +02:00
parent 8d59e10a06
commit 8c177dc832
3 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lisp/ChangeLog
View File

@ -1,3 +1,11 @@
2009-08-14 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-fast-tag-selection): Avoid text properties on tags
in the alist.
* org-agenda.el (org-agenda-get-restriction-and-command): Avoid
text properties on the match element.
2009-08-12 Carsten Dominik <carsten.dominik@gmail.com>
* org.el (org-set-regexps-and-options): Make sure the list of done

3
lisp/org-agenda.el
View File

@ -1806,7 +1806,8 @@ s Search for keywords C Configure custom agenda commands
(delete-region (point) (point-max))
(while (setq entry (pop custom1))
(setq key (car entry) desc (nth 1 entry)
type (nth 2 entry) match (nth 3 entry))
type (nth 2 entry)
match (org-no-properties (copy-sequence (nth 3 entry))))
(if (> (length key) 1)
(add-to-list 'prefixes (string-to-char key))
(insert

2
lisp/org.el
View File

@ -11241,7 +11241,7 @@ Returns the new tags string, or nil to not change the current settings."
(insert "\n")
(setq tbl (cdr tbl)))))
(t
(setq tg (car e) c2 nil)
(setq tg (copy-sequence (car e)) c2 nil)
(if (cdr e)
(setq c (cdr e))
;; automatically assign a character.