Don't refer to non-existent functions in mode line examples

* doc/lispintro/emacs-lisp-intro.texi (Mode Line): Ditto.

* doc/lispref/modes.texi (Mode Line Top): In the :eval example,
use a function that exists to avoid confusion (bug#19224).

diff --git a/doc/lispintro/emacs-lisp-intro.texi b/doc/lispintro/emacs-lisp-intro.texi
index c03fbfc47b249dbfc86d46290e99c75f54146666..c97f6b7a52b1bb5e93ee6e8eeef654e8700d8a61 100644 (file)
--- a/doc/lispintro/emacs-lisp-intro.texi
+++ b/doc/lispintro/emacs-lisp-intro.texi
@@ -17924,7 +17924,7 @@ My @file{.emacs} file has a section that looks like this:
    #("   %[(" 0 6
      (help-echo
       "mouse-1: select window, mouse-2: delete others ..."))
-   (:eval (mode-line-mode-name))
+   (:eval (format-time-string "%F"))
    mode-line-process
    minor-mode-alist
    #("%n" 0 2 (help-echo "mouse-2: widen" local-map (keymap ...)))

diff --git a/doc/lispref/modes.texi b/doc/lispref/modes.texi
index d12f2414245fad8c6d2096c9686024922d4e1a73..764a67e3627414d7e70692d3d14f647113eb2f5a 100644 (file)
--- a/doc/lispref/modes.texi
+++ b/doc/lispref/modes.texi
@@ -2023,7 +2023,7 @@ be useful for Shell mode (in reality, Shell mode does not set
    "   "
    'global-mode-string
    "   %[("
-   '(:eval (mode-line-mode-name))
+   '(:eval (format-time-string "%F"))
    'mode-line-process
    'minor-mode-alist
    "%n"