1999-12-11 Samir Barjoud <samir@mindspring.com>

        * help.el (where-is): use `commandp' as predicate for
        `completing-read'

lisp/ChangeLog

+1999-12-11  Samir Barjoud  <samir@mindspring.com>
+
+	* help.el (where-is): use `commandp' as predicate for
+	`completing-read'
+
 1999-12-10  Richard M. Stallman  <rms@caffeine.ai.mit.edu>
 
 	* cus-edit.el (custom-save-delete): Delete all occurrences,

lisp/help.el

@@ -874,7 +874,7 @@ If INSERT (the prefix arg) is non-nil, insert the message in the buffer."
      (setq val (completing-read (if fn
 				    (format "Where is command (default %s): " fn)
 				  "Where is command: ")
-				obarray 'fboundp t))
+				obarray 'commandp t))
      (list (if (equal val "")
 	       fn (intern val))
 	   current-prefix-arg)))