From 806a141f1e39b4f8523cdfa0b0cebccc30491552 Mon Sep 17 00:00:00 2001 From: Bastien Guerry Date: Sun, 6 Jan 2013 09:20:30 +0100 Subject: [PATCH] org-agenda.el (org-agenda-finalize): Don't try to align tags when there are no tags * org-agenda.el (org-agenda-finalize): Don't try to align tags when there are no tags. --- lisp/org-agenda.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index a9e7a7a6a..2468a9b0d 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -3522,7 +3522,9 @@ generating a new one." (while (org-activate-plain-links (point-max)) (add-text-properties (match-beginning 0) (match-end 0) '(face org-link)))) - (org-agenda-align-tags) + (when (cadr (assoc 'org-prefix-has-tag + (car org-prefix-format-compiled))) + (org-agenda-align-tags)) (unless org-agenda-with-colors (remove-text-properties (point-min) (point-max) '(face nil)))) (if (and (boundp 'org-agenda-overriding-columns-format) -- 2.11.4.GIT