Remove some properties from ASCII-exported text

2010-08-27 09:27:59 +02:00 · 2010-08-27 09:27:59 +02:00 · 33f9d116ba
parent 3d2dbf8604
commit 33f9d116ba
1 changed files with 4 additions and 1 deletions
--- a/lisp/org-ascii.el
+++ b/lisp/org-ascii.el
@ -573,7 +573,10 @@ publishing directory."
  (goto-char (point-min))
  (while (re-search-forward  "\\[@start:[0-9]+\\] ?" nil t)
    (org-if-unprotected
-     (replace-match ""))))
+     (replace-match "")))
+  (remove-text-properties
+   (point-min) (point-max)
+   '(face nil font-lock-fontified nil font-lock-multiline nil line-prefix nil wrap-prefix nil)))

 (defun org-html-expand-for-ascii (line)
  "Handle quoted HTML for ASCII export."