diff options
| author | Kyle Meyer <meyerkya@gmail.com> | 2013-07-15 20:18:19 -0400 |
|---|---|---|
| committer | Kyle Meyer <meyerkya@gmail.com> | 2013-07-17 00:18:20 -0400 |
| commit | 0fb4c30eb89af18914b49feee9c34bb1413d5829 (patch) | |
| tree | c3685f1ec2c4b286bf46c798e55e58618bcabe4a /init/km-org.el | |
| parent | c9ceb35a27ce0e9dac94cfd67d243aa136a6c96c (diff) | |
| download | emacs.d-0fb4c30eb89af18914b49feee9c34bb1413d5829.tar.gz | |
back to lower case org structure templates
tried to use upper case because that is the default but couldn't get
used to it
Diffstat (limited to 'init/km-org.el')
| -rw-r--r-- | init/km-org.el | 34 |
1 files changed, 24 insertions, 10 deletions
diff --git a/init/km-org.el b/init/km-org.el index 0c2ec98..686189f 100644 --- a/init/km-org.el +++ b/init/km-org.el @@ -113,16 +113,30 @@ (global-set-key (kbd "C-c o b") 'org-iswitchb) (global-set-key (kbd "C-c o m") 'km/open-main-orgfile) -(defvar km/additional-org-templates - '(("t" "#+TITLE: " "") - ("d" "#+DATE: " "") - ("o" "#+OPTIONS: " "") - ("p" "#+PROPERTY: " ""))) - -(mapcar - (lambda (template) - (add-to-list 'org-structure-template-alist template)) - km/additional-org-templates) +(setq org-structure-template-alist + '(("p" "#+property: " "") + ("o" "#+options: " "") + ("d" "#+date: " "") + ("t" "#+title: " "") + ("S" "#+setupfile: ?" "") + ("n" "#+begin_note\n ?\n#+end_note" "<note>\n?\n</note>") + ("w" "#+begin_note\n ?\n#+end_note" "<note>\n?\n</note>") + ;; lower case versions of defaults + ("s" "#+begin_src ?\n \n#+end_src" "<src lang=\"?\">\n\n</src>") + ("e" "#+begin_example\n ?\n#+end_example" "<example>\n?\n</example>") + ("q" "#+begin_quote\n ?\n#+end_quote" "<quote>\n?\n</quote>") + ("v" "#+begin_versen ?\n#+end_verse" "<verse>\n?\n</verse>") + ("V" "#+begin_verbatim\n ?\n#+end_verbatim" "<verbatim>\n?\n</verbatim>") + ("c" "#+begin_center\n ?\n#+end_center" "<center>\n?\n</center>") + ("l" "#+begin_latex\n ?\n#+end_latex" "<literal style=\"latex\">\n?\n</literal>") + ("L" "#+latex: " "<literal style=\"latex\">?</literal>") + ("h" "#+begin_html\n ?\n#+end_html" "<literal style=\"html\">\n?\n</literal>") + ("H" "#+html: " "<literal style=\"html\">?</literal>") + ("a" "#+begin_ascii\n ?\n#+end_ascii" "") + ("A" "#+ascii: " "") + ("i" "#+index: ?" "#+index: ?") + ("I" "#+include: %file ?" "<include file=%file markup=\"?\">"))) + ;; don't let `org-cycle-agenda-files' binding override custom ;; `backward-kill-word' binding (`org-cycle-agenda-files' is still bound |