diff options
author | Bastien Guerry <bzg@altern.org> | 2010-06-16 18:14:28 +0200 |
---|---|---|
committer | Bastien Guerry <bzg@altern.org> | 2010-06-16 18:14:28 +0200 |
commit | 8ac7e4800c721c8f71c87a295a7b3aa43c77c12c (patch) | |
tree | d1e1e24e93bc9d334d9d9e84dfee1253e8c1d3d4 | |
parent | 5633f7084a96298f415f07c348844bd5f22eb81e (diff) | |
download | org-mode-8ac7e4800c721c8f71c87a295a7b3aa43c77c12c.tar.gz |
Fix comments export in latex.
* lisp/org-exp.el: comment regexp now matches documentation. No more
protection check when deleting comments before export.
Thanks to Nicolas Goaziou <n.goaziou@gmail.com> for this patch.
-rw-r--r-- | lisp/org-exp.el | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/lisp/org-exp.el b/lisp/org-exp.el index 9ee39c4..919288a 100644 --- a/lisp/org-exp.el +++ b/lisp/org-exp.el @@ -1637,7 +1637,7 @@ table line. If it is a link, add it to the line containing the link." "Remove comments, or convert to backend-specific format. COMMENTSP can be a format string for publishing comments. When it is nil, all comments will be removed." - (let ((re "^\\(#\\|[ \t]*#\\+\\)\\(.*\n?\\)") + (let ((re "^\\(#\\|[ \t]*#\\+ \\)\\(.*\n?\\)") pos) (goto-char (point-min)) (while (or (looking-at re) @@ -1649,9 +1649,8 @@ When it is nil, all comments will be removed." (match-beginning 0) (match-end 0) '(org-protected t)) (replace-match (format commentsp (match-string 2)) t t)) (goto-char (1+ pos)) - (org-if-unprotected - (replace-match "") - (goto-char (max (point-min) (1- pos)))))))) + (replace-match "") + (goto-char (max (point-min) (1- pos))))))) (defun org-export-mark-radio-links () "Find all matches for radio targets and turn them into internal links." |