Fix last commit

* lisp/org.el (org-do-latex-and-related): Extract face from the correct
  location.
This commit is contained in:
Nicolas Goaziou 2016-01-18 00:58:34 +01:00
parent 74bb33d464
commit 0f8c6b0b2e
1 changed files with 3 additions and 1 deletions

View File

@ -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