From 7dc1f1a973ebf1164ac49b5751492fe67559ac0e Mon Sep 17 00:00:00 2001 From: Julien Danjou Date: Fri, 18 Mar 2011 17:36:18 +0100 Subject: [PATCH] org-colview: fix heading retrieval in Org buffers * lisp/org-colview.el (org-columns-display-here): Fix heading retrieval in Org buffers. Signed-off-by: Julien Danjou --- lisp/org-colview.el | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) diff --git a/lisp/org-colview.el b/lisp/org-colview.el index 3a03453cc..09f735f8f 100644 --- a/lisp/org-colview.el +++ b/lisp/org-colview.el @@ -186,8 +186,17 @@ This is the compiled version of the format.") title (nth 1 column) ass (if (equal property "ITEM") (cons "ITEM" - (org-no-properties - (org-get-at-bol 'txt))) + ;; When in a buffer, get the whole line, + ;; we'll clean it later… + (if (org-mode-p) + (save-match-data + (org-no-properties + (org-remove-tabs + (buffer-substring-no-properties + (point-at-bol) (point-at-eol))))) + ;; In agenda, just get the `txt' property + (org-no-properties + (org-get-at-bol 'txt)))) (assoc property props)) width (or (cdr (assoc property org-columns-current-maxwidths)) (nth 2 column)