普通に
(require 'wl-addrmgr)
(define-key wl-addrmgr-mode-map "." 'wl-addrmgr-goto-top)
とかじゃだめなん?
なんで hook の話が出てくるんだろ。