summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMichael Brand <michael.brand@alumni.ethz.ch>2016-02-08 19:59:36 +0100
committerMichael Brand <michael.brand@alumni.ethz.ch>2016-02-08 19:59:36 +0100
commitbfa670cd4ee652e97045aa4177def1b6d0fd2877 (patch)
treeb848eaa84e0c46b93a180b2c6151b00c591672e8
parent4f499fff9692f0ed745eddac867a34c4979574dd (diff)
downloadorg-mode-bfa670cd4ee652e97045aa4177def1b6d0fd2877.tar.gz
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'.
-rw-r--r--lisp/org-colview.el7
1 files changed, 5 insertions, 2 deletions
diff --git a/lisp/org-colview.el b/lisp/org-colview.el
index e615a64..c8628af 100644
--- a/lisp/org-colview.el
+++ b/lisp/org-colview.el
@@ -718,8 +718,11 @@ When COLUMNS-FMT-STRING is non-nil, use it as the column format."
(cons p
(let ((v (org-columns--value p (point))))
(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)))))
column-names)))
nil nil (and org-columns-skip-archived-trees 'archive))))