; Fix a typo in 'emacs-lisp-intro.texi'

* doc/lispintro/emacs-lisp-intro.texi (lengths-list-file): Fix doc
string of 'lengths-list-file' and surrounding text.  (Bug#80686)
This commit is contained in:
Eli Zaretskii
2026-03-29 12:32:05 +03:00
parent 0c961b7778
commit 8c481ac944

View File

@@ -14660,9 +14660,9 @@ beginning of the file. The function definition looks like this:
@smallexample
@group
(defun lengths-list-file (filename)
"Return list of definitions' lengths within FILE.
"Return list of definitions' lengths within the file named FILENAME.
The returned list is a list of numbers.
Each number is the number of words or
Each number in the list is the number of words or
symbols in one function definition."
@end group
@group
@@ -14683,10 +14683,10 @@ symbols in one function definition."
@end smallexample
@noindent
The function is passed one argument, the name of the file on which it
will work. It has four lines of documentation, but no interactive
specification. Since people worry that a computer is broken if they
don't see anything going on, the first line of the body is a
The function is passed one argument @var{filename}, the name of the file
on which it will work. It has four lines of documentation, but no
interactive specification. Since people worry that a computer is broken
if they don't see anything going on, the first line of the body is a
message.
The next line contains a @code{save-excursion} that returns Emacs's
@@ -14730,8 +14730,8 @@ definition and constructs a lengths' list containing the information.
Emacs kills the buffer after working through it. This is to save
space inside of Emacs. My version of GNU Emacs 19 contained over 300
source files of interest; GNU Emacs 22 contains over a thousand source
files. Another function will apply @code{lengths-list-file} to each
of the files.
files, and Emacs 30.2 more than 1600. Another function will apply
@code{lengths-list-file} to each of the files.
Finally, the last expression within the @code{let} expression is the
@code{lengths-list} variable; its value is returned as the value of
@@ -14744,13 +14744,13 @@ C-e} (@code{eval-last-sexp}).
@c !!! 22.1.1 lisp sources location here
@smallexample
(lengths-list-file
"/usr/local/share/emacs/22.1/lisp/emacs-lisp/debug.el")
"/usr/local/share/emacs/30.2/lisp/emacs-lisp/debug.el")
@end smallexample
@noindent
You may need to change the pathname of the file; the one here is for
GNU Emacs version 22.1. To change the expression, copy it to
the @file{*scratch*} buffer and edit it.
You may need to change the name of the file; the one here is for default
installation tree of GNU Emacs version 30.2. To change the expression,
copy it to the @file{*scratch*} buffer and edit it.
@need 1200
@noindent
@@ -14768,10 +14768,11 @@ Then evaluate the @code{lengths-list-file} expression.)
@need 1200
The lengths' list for @file{debug.el} takes less than a second to
produce and looks like this in GNU Emacs 22:
produce and looks like this in GNU Emacs 30.2:
@smallexample
(83 113 105 144 289 22 30 97 48 89 25 52 52 88 28 29 77 49 43 290 232 587)
(79 26 140 34 17 112 81 24 155 54 43 102 21 36 36 117 28 29 102 49 43
208 101 28 22 728 15 27)
@end smallexample
@need 1500