summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2017-06-23 13:52:16 +0200
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2017-06-23 13:52:16 +0200
commit7ca34d2aef42aad1d48692b58f51514e61204fd6 (patch)
tree7878174141e3a1546f76e29adbe99ede3637d29d
parent3c9ec81e1855cf362a98b689655af49bfd4831e6 (diff)
downloadorg-mode-7ca34d2aef42aad1d48692b58f51514e61204fd6.tar.gz
org-indent: Fix indentation of inline tasks
* lisp/org-indent.el (org-indent--compute-prefixes): Fix indentation of inline tasks when `org-inlinetask-show-first-star is non-nil. Reported-by: Rasmus <rasmus@gmx.us> <http://lists.gnu.org/archive/html/emacs-orgmode/2017-06/msg00452.html>
-rw-r--r--lisp/org-indent.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/org-indent.el b/lisp/org-indent.el
index 10c9617..4a22b15 100644
--- a/lisp/org-indent.el
+++ b/lisp/org-indent.el
@@ -142,11 +142,11 @@ useful to make it ever so slightly different."
;; Inline tasks line prefixes
(aset org-indent--inlinetask-line-prefixes
n
- (org-add-props (if (bound-and-true-p org-inlinetask-show-first-star)
- (concat org-indent-inlinetask-first-star
- (substring heading-prefix 1))
- heading-prefix)
- nil 'face 'org-indent)))
+ (cond ((<= n 1) "")
+ ((bound-and-true-p org-inlinetask-show-first-star)
+ (concat org-indent-inlinetask-first-star
+ (substring heading-prefix 1)))
+ (t (org-add-props heading-prefix nil 'face 'org-indent)))))
;; Text line prefixes.
(aset org-indent--text-line-prefixes
n