Browse Source

Fix last commit

* lisp/org.el (org-do-latex-and-related): Extract face from the correct
  location.
Nicolas Goaziou 9 years ago
parent
commit
0f8c6b0b2e
1 changed files with 3 additions and 1 deletions
  1. 3 1
      lisp/org.el

+ 3 - 1
lisp/org.el

@@ -6174,7 +6174,9 @@ done, nil otherwise."
 	    (cl-some
 	     (lambda (f)
 	       (memq f '(org-code org-verbatim underline org-special-keyword)))
-	     (face-at-point nil t))
+	     (save-excursion
+	       (goto-char (1+ (match-beginning 0)))
+	       (face-at-point nil t)))
 	  (let ((offset (if (memq (char-after (1+ (match-beginning 0)))
 				  '(?_ ?^))
 			    1