Explorar el Código

Merge branch 'maint'

Kyle Meyer hace 5 años
padre
commit
a8cc4f7244
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      lisp/org.el

+ 1 - 1
lisp/org.el

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