Column view: Use `org-hide-leading-stars'

* lisp/org-colview.el (org-columns): Make building of the item stars
dependent on `org-hide-leading-stars'.
This commit is contained in:
Michael Brand 2016-02-08 19:59:36 +01:00
parent 4f499fff96
commit bfa670cd4e
1 changed files with 5 additions and 2 deletions

View File

@ -718,8 +718,11 @@ When COLUMNS-FMT-STRING is non-nil, use it as the column format."
(cons p (cons p
(let ((v (org-columns--value p (point)))) (let ((v (org-columns--value p (point))))
(if (not (equal "ITEM" p)) v (if (not (equal "ITEM" p)) v
(concat (make-string (org-current-level) ?*) (concat (make-string
" " (1- (org-current-level))
(if org-hide-leading-stars
?\s ?*))
"* "
v))))) v)))))
column-names))) column-names)))
nil nil (and org-columns-skip-archived-trees 'archive)))) nil nil (and org-columns-skip-archived-trees 'archive))))