Permalink
Switch branches/tags
riak_ts-prealpha-builder-test2 riak_ts-prealpha-builder-test riak_ts-1.5.2 riak_ts-1.5.1 riak_ts-1.5.1b riak_ts-1.5.0 riak_ts-1.4.1 riak_ts-1.4.0 riak_ts-1.4.0rc9 riak_ts-1.4.0rc8 riak_ts-1.4.0rc7 riak_ts-1.4.0rc6 riak_ts-1.4.0rc5 riak_ts-1.4.0rc4 riak_ts-1.4.0rc3 riak_ts-1.4.0rc2 riak_ts-1.4.0rc1 riak_ts-1.3.1 riak_ts-1.3.1rc2 riak_ts-1.3.1rc1 riak_ts-1.3.0 riak_ts-1.3.0rc19 riak_ts-1.3.0rc18 riak_ts-1.3.0rc7 riak_ts-1.3.0rc6 riak_ts-1.3.0rc5 riak_ts-1.3.0rc4 riak_ts-1.3.0rc3 riak_ts-1.3.0rc2 riak_ts-1.3.0rc1 riak_ts-1.3.0beta1 riak_ts-1.2.0 riak_ts-1.2.0rc8 riak_ts-0.8.0 riak_ts-0.8.0rc3 riak_ts-0.8.0rc2 riak_ts-0.8.0rc1 riak_ts-0.8.0merged1 riak_ts-0.8.0merged riak_ts-0.0.3 riak_ts-0.0.2 riak_ts-0.0.1 riak-2.2.3 riak-2.2.3rc1 riak-2.2.2 riak-2.2.2rc1 riak-2.2.1 riak-2.2.1rc3 riak-2.2.1rc1 riak-2.2.0 riak-2.2.0rc14 riak-2.2.0rc13 riak-2.2.0rc11 riak-2.2.0rc10 riak-2.2.0rc8 riak-2.2.0rc4 riak-2.2.0-devtest1 riak-2.1.4 riak-2.1.4-testhook2 riak-2.1.4-testhook1 riak-2.1.3 riak-2.1.2 riak-2.1.2pre2 riak-2.1.1 riak-2.1.1rc2 riak-2.1.1rc1 riak-2.1.1pre1 riak-2.1.0 riak-2.1.0rc1 riak-2.1.0pre3 riak-2.1.0pre2 riak-2.1.0pre1 riak-2.0.9 riak-2.0.9rc1 riak-2.0.8 riak-2.0.8rc5 riak-2.0.8rc4 riak-2.0.8rc3 riak-2.0.8rc2 riak-2.0.8rc1 riak-2.0.7 riak-2.0.7-test riak-2.0.6 riak-2.0.6rc2 riak-2.0.6rc1 riak-2.0.5 riak-2.0.4 riak-2.0.3 riak-2.0.2 riak-2.0.1 riak-2.0.0 riak-2.0.0rc2 riak-2.0.0rc1 riak-2.0.0pre22 riak-2.0.0pre20 riak-2.0.0pre19 riak-2.0.0pre18 riak-2.0.0pre17 riak-2.0.0pre16 riak-2.0.0pre15
Nothing to show
Find file
Fetching contributors…
Cannot retrieve contributors at this time
36 lines (31 sloc) 1.22 KB
;; setup erlang mode
(let ((tp (shell-command-to-string "erl -noinput -eval \"io:format(\\\"~s\\\", [code:lib_dir(tools)])\" -run init stop")))
(setq load-path (cons (concat tp "/emacs")
load-path))
(require 'erlang-start))
;; Org-mode
;; specify ORG_PATH if you have org-mode installed somewhere
;; other than your site-lisp path
(let ((orgpath (getenv "ORG_PATH")))
(if (stringp orgpath)
(setq load-path
(cons (concat orgpath "/lisp")
(cons (concat orgpath "/contrib/lisp")
load-path)))))
(require 'org-install)
(add-to-list 'auto-mode-alist '("\\.org\\'" . org-mode))
;; allow css to set code highlighting style
(setq org-export-htmlize-output-type 'css)
;; command-line --eval functions
(defun riak-export-doc-file (filename format)
(find-file filename)
(cond ((eq format 'ascii) (org-export-as-ascii 3)
(kill-this-buffer))
((eq format 'html) (org-export-as-html 3)
(kill-this-buffer))
(message "Unknown export format"))
(kill-this-buffer))
(defun riak-export-doc-dir (directory format)
(mapcar
(lambda (filename) (riak-export-doc-file filename format))
(file-expand-wildcards (concat directory "/*.org"))))