diff --git a/lisp/org-publish.el b/lisp/org-publish.el
index 67540a676..a0b3cb73c 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 8ca9cfc75..62ba380b1 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"
"\n\n")
- ("e" "#+begin_example\n?\n#+end_example"
+ ("e" "#+BEGIN_EXAMPLE\n?\n#+END_EXAMPLE"
"\n?\n")
- ("q" "#+begin_quote\n?\n#+end_quote"
+ ("q" "#+BEGIN_QUOTE\n?\n#+END_QUOTE"
"\n?\n
")
- ("v" "#+begin_verse\n?\n#+end_verse"
+ ("v" "#+BEGIN_VERSE\n?\n#+END_VERSE"
"\n?\n/verse>")
- ("c" "#+begin_center\n?\n#+end_center"
+ ("c" "#+BEGIN_CENTER\n?\n#+END_CENTER"
"\n?\n/center>")
- ("l" "#+begin_latex\n?\n#+end_latex"
+ ("l" "#+BEGIN_LaTeX\n?\n#+END_LaTeX"
"\n?\n")
- ("L" "#+latex: "
+ ("L" "#+LaTeX: "
"?")
- ("h" "#+begin_html\n?\n#+end_html"
+ ("h" "#+BEGIN_HTML\n?\n#+END_HTML"
"\n?\n")
- ("H" "#+html: "
+ ("H" "#+HTML: "
"?")
- ("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 ?"
"")
)
"Structure completion elements.