blob: 41a8d05e1593ce6c88edbc97e1ae22d82cb95ca6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
(defvar org-location "~/src/emacs/org-mode/lisp")
(when (and org-location (file-exists-p org-location))
(add-to-list 'load-path org-location)
(require 'org))
(require 'ox-md)
(let ((readme-file "README")
exported-file
(final-file "README.md"))
(with-current-buffer (find-file-noselect readme-file)
(setq exported-file (org-md-export-to-markdown)))
(rename-file exported-file final-file t))
|