|
@@ -5287,7 +5287,7 @@ by a #."
|
|
|
(add-text-properties
|
|
(add-text-properties
|
|
|
beg (if whole-blockline bol-after-beginline end-of-beginline)
|
|
beg (if whole-blockline bol-after-beginline end-of-beginline)
|
|
|
'(face org-block-begin-line))
|
|
'(face org-block-begin-line))
|
|
|
- (unless (string-prefix-p "*" (match-string 1))
|
|
|
|
|
|
|
+ (unless (eq (char-after beg-of-endline) ?*)
|
|
|
(add-text-properties
|
|
(add-text-properties
|
|
|
beg-of-endline
|
|
beg-of-endline
|
|
|
(if whole-blockline
|
|
(if whole-blockline
|