emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

org: add org-export settings

Browse source
This commit is contained in:
Henrik Lissner 2015-12-04 03:25:51 -05:00
parent f9a9451279
commit 919468e7e6
1 changed files with 14 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

15
modules/module-org.el
View file

@ -47,7 +47,6 @@
(sequence "LEAD(l)" "NEXT(n)" "ACTIVE(a)" "PENDING(p)" "|" "CANCELLED(c)")) (sequence "LEAD(l)" "NEXT(n)" "ACTIVE(a)" "PENDING(p)" "|" "CANCELLED(c)"))
org-blank-before-new-entry '((heading . nil) org-blank-before-new-entry '((heading . nil)
(plain-list-item . auto)) (plain-list-item . auto))
org-export-backends '(ascii html latex md opml)
org-tag-alist '(("@home" . ?h) org-tag-alist '(("@home" . ?h)
("@daily" . ?d) ("@daily" . ?d)
@ -111,6 +110,19 @@
(add-to-list 'org-link-frame-setup '(file . find-file))) (add-to-list 'org-link-frame-setup '(file . find-file)))
(defun narf@org-export ()
(defvar narf-org-export-directory (concat org-directory ".export"))
(require 'ox-pandoc)
(setq org-export-backends '(ascii html latex md opml)
org-export-with-toc nil)
;; Export to a central directory (why isn't this easier?)
(defun narf*org-export-output-file-name (args)
(unless (nth 2 args)
(setq args (append args (list narf-org-export-directory))))
args)
(advice-add 'org-export-output-file-name :filter-args 'narf*org-export-output-file-name))
(defun narf@org-babel () (defun narf@org-babel ()
(setq org-confirm-babel-evaluate nil ; you don't need my permission (setq org-confirm-babel-evaluate nil ; you don't need my permission
org-src-fontify-natively t ; make code pretty org-src-fontify-natively t ; make code pretty
@ -333,6 +345,7 @@ will function properly."
(narf@org-babel) (narf@org-babel)
(narf@org-latex) (narf@org-latex)
(narf@org-looks) (narf@org-looks)
(narf@org-export)
(add-hook 'org-mode-hook 'narf|org-hook) (add-hook 'org-mode-hook 'narf|org-hook)