summaryrefslogtreecommitdiff
path: root/scripts/readme-to-md.el
blob: 33030297e58c003d447a8c543222b5977f1bf3ab (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 "bog-readme.org")
      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))