From bdf92cfcf7032bdd38585241227bd39c69fdc5a1 Mon Sep 17 00:00:00 2001 From: HIRATA Tadashi Date: Tue, 21 Aug 2018 20:03:19 +0200 Subject: [PATCH] org-indent: Add `org-indent' face to `org-indent-boundary-char' * lisp/org-indent.el (org-indent--compute-prefixes): When `org-indent-boundary-char' doens't have `org-indent' face property in Org Indent mode, it causes an appearance issue. When you use Org mode with Whitespace mode, you can't control `org-indent-boundary-char''s face neither `whitespace-space' face nor `org-indent' face. TINYCHANGE --- lisp/org-indent.el | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/lisp/org-indent.el b/lisp/org-indent.el index ceb6c4b9f..bf35ff763 100644 --- a/lisp/org-indent.el +++ b/lisp/org-indent.el @@ -150,10 +150,11 @@ useful to make it ever so slightly different." ;; Text line prefixes. (aset org-indent--text-line-prefixes n - (concat (org-add-props (make-string (+ n indentation) ?\s) - nil 'face 'org-indent) - (and (> n 0) - (char-to-string org-indent-boundary-char))))))) + (org-add-props + (concat (make-string (+ n indentation) ?\s) + (and (> n 0) + (char-to-string org-indent-boundary-char))) + nil 'face 'org-indent))))) (defsubst org-indent-remove-properties (beg end) "Remove indentations between BEG and END."