Attached find an attempt to fix bugs #587, #669, and #690.  Please try
it and report errors immediately.


Note for bug #669.  With Drew's recipe

 > emacs -Q
 >
 > (defun foo (&optional predicate)
 >   "" (interactive) (message "FOO"))
 >
 > (defalias 'lisp-complete-symbol (symbol-function 'foo))
 >
 > C-h k then shows this, which is 100% wrong:
 >
 > M-TAB (translated from <escape> <tab>) runs the command
 > lisp-complete-symbol, which is an interactive Lisp function in
 > `lisp.el'.
 >
 > It is bound to M-TAB.
 >
 > (lisp-complete-symbol &optional predicate)

the bug is fixed iff the defs come from a file you load before or you do
an `eval-buffer' before C-h k.  The bug is not fixed if you simply do
C-x C-e for the defs since this won't modify `load-history'.

Thank you, martin