From 41ab6e292a962de06bf93c912c0b7ddeab8adb40 Mon Sep 17 00:00:00 2001 From: Max Mikhanosha Date: Fri, 9 Mar 2012 10:12:59 -0500 Subject: [PATCH] Remove org-prefix-format-compiled from locals list --- lisp/org-agenda.el | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 523e02720..6b4f30d04 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -1852,7 +1852,7 @@ When nil, `q' will kill the single agenda buffer." ; org-agenda-archives-mode ;; Taken out because it is hard to make work with sticky buffers because it is used in .org buffers and maybe even elsewhere. Just leave it global for now. ; org-agenda-entry-text-cleanup-hook ; Must be global ; org-agenda-include-inactive-timestamps ; Scoped variable, should be global - org-prefix-format-compiled ; Not sure how this works, but Max did specifically this, to it is likely OK to be local + ; org-prefix-format-compiled ; Fine as global, the culprit was org-prefix-has-xxx vars -- Max ; org-agenda-mode-map ; Must be global ; org-agenda-menu ; Must be global org-agenda-follow-mode ; OK with sticky buffers @@ -5736,10 +5736,7 @@ Any match of REMOVE-RE will be removed from TXT." ;; Agenda buffers, because this function expects to be called with ;; the buffer where item comes from being current, and not agenda ;; buffer - (let* ((org-prefix-format-compiled - (with-current-buffer org-agenda-buffer - org-prefix-format-compiled)) - (bindings (car org-prefix-format-compiled)) + (let* ((bindings (car org-prefix-format-compiled)) (formatter (cadr org-prefix-format-compiled))) (loop for (var value) in bindings do (set var value)) -- 2.11.4.GIT