Starter Kit Org
This is part of the Emacs Starter Kit.
Starter Kit Org
Configuration for the eminently useful Org Mode.
Org-mode is for keeping notes, maintaining ToDo lists, doing project planning, and authoring with a fast and effective plain-text system. Org Mode can be used as a very simple folding outliner or as a complex GTD system or tool for reproducible research and literate programming.
For more information on org-mode check out worg, a large Org-mode wiki which is also implemented using Org-mode and git.
Org-Mode Hook
The latest version of yasnippets doesn't play well with Org-mode, the following function allows these two to play nicely together
(defun yas/org-very-safe-expand () (let ((yas/fallback-behavior 'return-nil)) (yas/expand)))
(add-hook 'org-mode-hook (lambda () (local-set-key "\M-\C-n" 'outline-next-visible-heading) (local-set-key "\M-\C-p" 'outline-previous-visible-heading) (local-set-key "\M-\C-u" 'outline-up-heading) ;; table (local-set-key "\M-\C-w" 'org-table-copy-region) (local-set-key "\M-\C-y" 'org-table-paste-rectangle) (local-set-key "\M-\C-l" 'org-table-sort-lines) ;; display images (local-set-key "\M-I" 'org-toggle-iimage-in-org) ;; yasnippet (using the new org-cycle hooks) (make-variable-buffer-local 'yas/trigger-key) (setq yas/trigger-key [tab]) (add-to-list 'org-tab-first-hook 'yas/org-very-safe-expand) (define-key yas/keymap [tab] 'yas/next-field) ))
Speed keys
Speed commands enable single-letter commands in Org-mode files when the point is at the beginning of a headline, or at the beginning of a code block.
See the `=org-speed-commands-default=' variable for a list of the keys
and commands enabled at the beginning of headlines. All code blocks
are available at the beginning of a code block, the following key
sequence C-c C-v h
(bound to `=org-babel-describe-bindings=') will
display a list of the code blocks commands and their related keys.
(setq org-use-speed-commands t)
Code blocks
This activates a number of widely used languages, you are encouraged to activate more languages using the customize interface for the `=org-babel-load-languages=' variable, or with an elisp form like the one below. The customize interface of `=org-babel-load-languages=' contains an up to date list of the currently supported languages.
(org-babel-do-load-languages 'org-babel-load-languages '((emacs-lisp . t) (sh . t) (R . t) (perl . t) (ruby . t) (python . t) (js . t) (haskell . t) (clojure . t) (ditaa . t)))
You are encouraged to add the following to your personal configuration although it is not added by default as a security precaution.
(setq org-confirm-babel-evaluate nil)
The following displays the contents of code blocks in Org-mode files
using the major-mode of the code. It also changes the behavior of
TAB
to as if it were used in the appropriate major mode. This means
that reading and editing code form inside of your Org-mode files is
much more like reading and editing of code using its major mode.
(setq org-src-fontify-natively t) (setq org-src-tab-acts-natively t)
Load up the Library of Babel
The library of babel contains makes many useful functions available
for use by code blocks in any emacs file. See the actual
library-of-babel.org
file (located in the contrib
directory of Org-mode)
for information on the functions, and see
worg:library-of-babel for more usage information.
Ensure the Latest Org-mode manual is in the info directory
By placing the doc/
directory in Org-mode at the front of the
Info-directory-list
we can be sure that the latest version of the
Org-mode manual is available to the info
command (bound to C-h i
).
(if (boundp 'Info-directory-list) (setq Info-directory-list (append Info-directory-list Info-default-directory-list)) (setq Info-directory-list Info-default-directory-list)) (setq Info-directory-list (cons (expand-file-name "doc" (expand-file-name "org" (expand-file-name "src" dotfiles-dir))) Info-directory-list))
Starter Kit Documentation
This code defines the starter-kit-project
which is used to publish
the documentation for the Starter Kit to html.
(setq org-export-htmlize-output-type 'css) (unless (boundp 'org-publish-project-alist) (setq org-publish-project-alist nil)) (let ((this-dir (file-name-directory (or load-file-name buffer-file-name)))) (add-to-list 'org-publish-project-alist `("starter-kit-documentation" :base-directory ,this-dir :base-extension "org" :style "<link rel=\"stylesheet\" href=\"emacs.css\" type=\"text/css\"/>" :publishing-directory ,this-dir :index-filename "starter-kit.org"