tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

Fix commit 40084a55d1

Browse source 
* lisp/org-exp.el (org-export-handle-comments): Also remove comments
  at column 0.
This commit is contained in:
Nicolas Goaziou 2012-08-27 12:11:50 +02:00
parent 40084a55d1
commit 857b980515
1 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
lisp/org-exp.el
View file

@ -1998,7 +1998,13 @@ When it is nil, all comments will be removed."
(org-add-props
(format org-commentsp (buffer-substring (match-end 0) end))
nil 'org-protected t)
t t)))))))
t t)))))
;; Hack attack: previous implementation also removed keywords at
;; column 0. Brainlessly do it again.
(goto-char (point-min))
(while (re-search-forward "^#\\+" nil t)
(unless (get-text-property (point-at-bol) 'org-protected)
(delete-region (point-at-bol) (progn (forward-line) (point)))))))
(defun org-export-handle-metalines ()
"Remove tables and source blocks metalines.