Hu gnus.


What is wrong with this simple code, (taken directly from O'Reilly's
<italic>Learning Gnu Emacs</italic>)? 


<fontfamily><param>Courier</param><color><param>9291,0000,9493</param><smaller>	(defun
count-words-buffer ()

	  (let ((count 0))

	    (goto-char (point-min))

	    (while (<< (point) (point-max))

	      (forward-word 1)

	      (setq count (+ 1 count)))

	    (message "Buffer contains %d words." count)))

	

	(count-words-buffer)*

	

	--1-:**-F1  wordcount.el      [(Lisp
Interaction)]--L10--All---------------


</smaller></color></fontfamily>

With point at * (above), C-j to evaluate achieves nothing.  Below is
the backtrace buffer output.  



<fontfamily><param>Courier</param><color><param>9291,0000,9493</param><smaller>	Debugger
entered--Lisp error: (void-function count-words-buffer)

	  (count-words-buffer)

	  eval((count-words-buffer))

	  eval-last-sexp-1(t)

	  eval-last-sexp(t)

	  eval-print-last-sexp()

	  call-interactively(eval-print-last-sexp)

	

	-:%*-F1  *Backtrace*      
[(Debugger)]--L2-All----------------------------

</smaller></color></fontfamily>

<italic>Learning Gnu Emacs </italic>(2nd edition) is written for Emacs
v. 19.30.  I'm running v. 21.2.  Can things have changed that much?


Seb.


<italic><color><param>FFFF,2727,4242</param>

</color></italic><color><param>FFFF,2727,4242</param>"War is not the
answer..." - Marvin Gaye -<italic> 'What's Going On?'</italic></color>