diff --git a/README.org b/README.org
index 5ba1966..d93b542 100644
--- a/README.org
+++ b/README.org
@@ -616,6 +616,7 @@ defined in this Org file.
         "LaTeX"
         (TeX-brace-count-line-override :no-manual t)
         (toggle-TeX-brace-count-line-override :no-manual t)
+        (update-lualatex-opentype-font-name-database :no-manual t)
         "Org"
         (by-backend :no-manual t)
         (by-backend-kbd-org-macro :no-manual t)
@@ -1366,14 +1367,15 @@ in listing [[lst:configure-auctex]] corrects this by advising to override
 #+caption: Update the =LuaLaTeX= =OpenType Font= name database.
 #+name: lst:update-lualatex-opentype-font-name-database
 #+begin_src emacs-lisp
-  (defun update-lualatex-opentype-font-name-database ()
-    "Update the \"OpenType Font\" name database for \"LuaLaTeX\"."
-    (interactive)
-    (cl-destructuring-bind (exit-code output)
-        (shell-command-with-exit-code
-         "luaotfload-tool" "-vv" "--update" "--force")
-      (if (= 0 exit-code) (message "%s" (string-trim output))
-        (error "%s" (string-trim output)))))
+  (with-eval-after-load 'emacs
+    (defun update-lualatex-opentype-font-name-database ()
+      "Update the \"OpenType Font\" name database for \"LuaLaTeX\"."
+      (interactive)
+      (cl-destructuring-bind (exit-code output)
+          (shell-command-with-exit-code
+           "luaotfload-tool" "-vv" "--update" "--force")
+        (if (= 0 exit-code) (message "%s" (string-trim output))
+          (error "%s" (string-trim output))))))
 #+end_src
 
 #+caption[Configure =AUCTeX=]: