diff --git a/lisp/org-beamer.el b/lisp/org-beamer.el
index 8a79c67bd..1cd7b4d4c 100644
--- a/lisp/org-beamer.el
+++ b/lisp/org-beamer.el
@@ -571,7 +571,7 @@ square brackets."
 (add-hook 'org-export-preprocess-before-selecting-backend-code-hook
 	  'org-beamer-select-beamer-code)
 
-(defun org-beamer-settings-template (kind)
+(defun org-insert-beamer-options-template (kind)
   "Insert a settings template, to make sure users do this right."
   (interactive (progn
 		 (message "Current [s]ubtree or [g]lobal?")
diff --git a/lisp/org.el b/lisp/org.el
index eefffdfdb..97650d47e 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -17184,7 +17184,7 @@ See the individual commands for more information."
       :style toggle :selected (and (boundp 'org-export-with-LaTeX-fragments)
 				   org-export-with-LaTeX-fragments)]
      "--"
-     ["Template for BEAMER" org-beamer-settings-template t])
+     ["Template for BEAMER" org-insert-beamer-options-template t])
     "--"
     ("MobileOrg"
      ["Push Files and Views" org-mobile-push t]