Mercurial > emacs

comparison lisp/org/org-exp.el @ 101834:31625710c524

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
2009-02-06 Carsten Dominik <dominik@science.uva.nl> * org-exp.el (org-export-remove-or-extract-drawers): Fix regular expression for extracting drawers.
author Carsten Dominik <dominik@science.uva.nl>
date Fri, 06 Feb 2009 16:17:56 +0000
parents 97ed2489367d
children ac1a55cc2c38
comparison
equal deleted inserted replaced
101833:97ed2489367d 101834:31625710c524
1749 (mapconcat 1749 (mapconcat
1750 'identity 1750 'identity
1751 (org-delete-all exp-drawers 1751 (org-delete-all exp-drawers
1752 (copy-sequence all-drawers)) 1752 (copy-sequence all-drawers))
1753 "\\|") 1753 "\\|")
1754 "\\):[ \t]*\n\\([^@]*?\n\\)?[ \t]*:END:[ \t]*\n"))) 1754 "\\):[ \t]*\n\\([^\000]*?\n\\)?[ \t]*:END:[ \t]*\n")))
1755 (while (re-search-forward re nil t) 1755 (while (re-search-forward re nil t)
1756 (org-if-unprotected 1756 (org-if-unprotected
1757 (replace-match "")))))) 1757 (replace-match ""))))))
1758 1758
1759 (defun org-export-handle-export-tags (select-tags exclude-tags) 1759 (defun org-export-handle-export-tags (select-tags exclude-tags)