251 

   252 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

   253 (message "bbdb")

   254 

   255 (eval-when 'compile (require 'bbdb nil t))

   256 

   257 (setq

   258  bbdb-offer-save 1

   259  bbdb-use-pop-up t

   260  bbdb-electric-p t

   261  bbdb-popup-target-lines  1

   262  )

   263 

   264 (setq bbdb-complete-name-full-completion t)

   265 (setq bbdb-completion-type 'primary-or-name)

   266 (setq bbdb-complete-name-allow-cycling t)

   267 

   268 (setq bbdb-file "~/.gnus/bbdb")

   269 

   270 ;; (bbdb-initialize 'gnus 'message)

   271 ;; (bbdb-insinuate-message)

   272 ;; (add-hook 'gnus-startup-hook 'bbdb-insinuate-gnus)