blob: d3838e83eb5e06c85accd6c17b0ab6fd14327008 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
;;; docs.el --- configuration for docs exports
;;; Commentary:
;;; Code:
(require 'org)
(require 'ox)
(require 'ox-ascii)
;; We do NOT want backup files.
(setq make-backup-files nil)
(defun docs-install-txt ()
"Extract and export installation manual from the User Manual."
(let ((org-export-with-toc nil))
(re-search-forward "^* Installation")
(org-ascii-export-to-ascii nil t)))
(defun docs-install-org ()
"Extract and export installation manual as an org file from the User Manual."
(let ((org-export-with-toc nil))
(re-search-forward "^* Installation")
(org-org-export-to-org nil t)))
(provide 'docs)
;;; docs.el ends here
|
