summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBastien Guerry <bzg@altern.org>2012-01-12 08:42:16 +0100
committerBastien Guerry <bzg@altern.org>2012-01-12 08:42:16 +0100
commitd3f62310acbdf2f33d873e5de9c131101d829473 (patch)
tree5b3241748c1b698ab8da708abf531244fd9c0067
parentd4c146be58875ff9bbe06d87290b068cff569e64 (diff)
downloadorg-mode-d3f62310acbdf2f33d873e5de9c131101d829473.tar.gz
Use uppercase for `org-structure-template-alist'.
* org.el (org-structure-template-alist): Use uppercase for keywords. * org-publish.el (org-publish-index-generate-theindex): Use uppercase for the #+INCLUDE keyword.
-rw-r--r--lisp/org-publish.el2
-rw-r--r--lisp/org.el28
2 files changed, 15 insertions, 15 deletions
diff --git a/lisp/org-publish.el b/lisp/org-publish.el
index 67540a6..a0b3cb7 100644
--- a/lisp/org-publish.el
+++ b/lisp/org-publish.el
@@ -1031,7 +1031,7 @@ the project."
(setq ibuffer (find-file-noselect index-file))
(with-current-buffer ibuffer
(erase-buffer)
- (insert "\n\n#+include: \"theindex.inc\"\n\n")
+ (insert "\n\n#+INCLUDE: \"theindex.inc\"\n\n")
(save-buffer))
(kill-buffer ibuffer)))))
diff --git a/lisp/org.el b/lisp/org.el
index 8ca9cfc..62ba380 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -11024,29 +11024,29 @@ This function can be used in a hook."
(defcustom org-structure-template-alist
'(
- ("s" "#+begin_src ?\n\n#+end_src"
+ ("s" "#+BEGIN_SRC ?\n\n#+END_SRC"
"<src lang=\"?\">\n\n</src>")
- ("e" "#+begin_example\n?\n#+end_example"
+ ("e" "#+BEGIN_EXAMPLE\n?\n#+END_EXAMPLE"
"<example>\n?\n</example>")
- ("q" "#+begin_quote\n?\n#+end_quote"
+ ("q" "#+BEGIN_QUOTE\n?\n#+END_QUOTE"
"<quote>\n?\n</quote>")
- ("v" "#+begin_verse\n?\n#+end_verse"
+ ("v" "#+BEGIN_VERSE\n?\n#+END_VERSE"
"<verse>\n?\n/verse>")
- ("c" "#+begin_center\n?\n#+end_center"
+ ("c" "#+BEGIN_CENTER\n?\n#+END_CENTER"
"<center>\n?\n/center>")
- ("l" "#+begin_latex\n?\n#+end_latex"
+ ("l" "#+BEGIN_LaTeX\n?\n#+END_LaTeX"
"<literal style=\"latex\">\n?\n</literal>")
- ("L" "#+latex: "
+ ("L" "#+LaTeX: "
"<literal style=\"latex\">?</literal>")
- ("h" "#+begin_html\n?\n#+end_html"
+ ("h" "#+BEGIN_HTML\n?\n#+END_HTML"
"<literal style=\"html\">\n?\n</literal>")
- ("H" "#+html: "
+ ("H" "#+HTML: "
"<literal style=\"html\">?</literal>")
- ("a" "#+begin_ascii\n?\n#+end_ascii")
- ("A" "#+ascii: ")
- ("i" "#+index: ?"
- "#+index: ?")
- ("I" "#+include %file ?"
+ ("a" "#+BEGIN_ASCII\n?\n#+END_ASCII")
+ ("A" "#+ASCII: ")
+ ("i" "#+INDEX: ?"
+ "#+INDEX: ?")
+ ("I" "#+INCLUDE %file ?"
"<include file=%file markup=\"?\">")
)
"Structure completion elements.