> !               (let ((default (and (current-word)
> !                                   (car (assoc (current-word)
> !                                               
> woman-topic-all-completions)))))

Instead of assoc, I'd recommend you use test-completion.  It's probably
equivalent given the current code, but it makes the intention much more
clear and will work if the completion table is ever changed to some
other format.


        Stefan


_______________________________________________
Emacs-devel mailing list
Emacs-devel@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-devel

Reply via email to