summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorFrancesco Pizzolante <fpz-djc/iPCCuDYQheJpep6IedvLeJWuRmrY@public.gmane.org>2013-01-31 16:35:31 +0100
committerBastien Guerry <bzg@altern.org>2013-02-11 15:46:56 +0100
commit5e22630f00cd4d106e19bab0b857b1edeffb1949 (patch)
treee340794c663bcf42be13fb479c2c1fcbdafa2af9
parentb05259ee9b5eb7bb008913f20e0dc86edf825bcb (diff)
downloadorg-mode-5e22630f00cd4d106e19bab0b857b1edeffb1949.tar.gz
Protect `org-agenda-prepare-buffers' with `org-unmodified'
* org.el (org-agenda-prepare-buffers): Protect with `org-unmodified'. TINYCHANGE
-rw-r--r--lisp/org.el7
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/org.el b/lisp/org.el
index 20d3e54..83cfc01 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -17469,7 +17469,7 @@ When a buffer is unmodified, it is just killed. When modified, it is saved
(inhibit-read-only t)
(org-inhibit-startup org-agenda-inhibit-startup)
(rea (concat ":" org-archive-tag ":"))
- bmp file re)
+ file re)
(save-excursion
(save-restriction
(while (setq file (pop files))
@@ -17479,7 +17479,7 @@ When a buffer is unmodified, it is just killed. When modified, it is saved
(org-check-agenda-file file)
(set-buffer (org-get-agenda-file-buffer file)))
(widen)
- (setq bmp (buffer-modified-p))
+ (org-unmodified
(org-refresh-category-properties)
(org-refresh-properties org-effort-property 'org-effort)
(org-refresh-properties "APPT_WARNTIME" 'org-appt-warntime)
@@ -17506,8 +17506,7 @@ When a buffer is unmodified, it is just killed. When modified, it is saved
org-comment-string))
(while (re-search-forward re nil t)
(add-text-properties
- (match-beginning 0) (org-end-of-subtree t) pc)))
- (set-buffer-modified-p bmp)))))
+ (match-beginning 0) (org-end-of-subtree t) pc))))))))
(setq org-todo-keywords-for-agenda
(org-uniquify org-todo-keywords-for-agenda))
(setq org-todo-keyword-alist-for-agenda