doc/lispref/emacs-lisp-intro.texi (count-words-in-defun): Fix bug#10544.

2 files changed, 6 insertions, 1 deletions

diff --git a/doc/lispintro/ChangeLog b/doc/lispintro/ChangeLog
index 30ea2be6803..2a1d018cc26 100644
--- a/doc/lispintro/ChangeLog
+++ b/doc/lispintro/ChangeLog
@@ -1,3 +1,8 @@
+2012-01-19  Juanma Barranquero  <lekktu@gmail.com>
+
+        * emacs-lisp-intro.texi (count-words-in-defun):
+        Add missing parenthesis (bug#10544).
+
 2012-01-17  Glenn Morris  <rgm@gnu.org>
 
         * emacs-lisp-intro.texi (re-search-forward): Fix typo.
diff --git a/doc/lispintro/emacs-lisp-intro.texi b/doc/lispintro/emacs-lisp-intro.texi
index be49c52ac2c..d70ff9f3b44 100644
--- a/doc/lispintro/emacs-lisp-intro.texi
+++ b/doc/lispintro/emacs-lisp-intro.texi
@@ -15012,7 +15012,7 @@ expression for this (@pxref{Syntax}), so the loop is straightforward:
 @group
 (while (and (< (point) end)
             (re-search-forward
-             "\\(\\w\\|\\s_\\)+[^ \t\n]*[ \t\n]*" end t)
+             "\\(\\w\\|\\s_\\)+[^ \t\n]*[ \t\n]*" end t))
   (setq count (1+ count)))
 @end group
 @end smallexample