simple func for adding www addresses

Hello Sorry for any double posting: The following primitive hack adds a www address to my bbdb (defun my-bbdb-add-www () (interactive) (let ((myurl (ffap-url-at-point))) (find-file-confirm-non-existing ~/.bbdb) (goto-char (point-max)) (insert [nil nil nil nil nil nil nil

how to add and www address to bbdb

Hello The following primitive hack adds a www address to my bbdb (defun my-bbdb-add-www () (interactive) (let ((myurl (ffap-url-at-point))) (find-file-confirm-non-existing ~/.bbdb) (goto-char (point-max)) ; (insert \n) (insert [nil nil nil nil nil nil nil ((creation-date . \) (insert