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).

2 files changed, 2 insertions, 2 deletions

diff --git a/doc/lispintro/emacs-lisp-intro.texi b/doc/lispintro/emacs-lisp-intro.texi
index c03fbfc47b2..c97f6b7a52b 100644
--- 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 d12f2414245..764a67e3627 100644
--- 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"