(let ((proc
(navi2ch-net-send-request
url "POST"
(list (cons "Content-Type" "application/x-www-form-urlencoded")
+ (cons "User-Agent" "Monazilla/1.00 Navi2ch")
(cons "Cookie" (concat "NAME=" from "; MAIL=" mail
(if spid (concat "; SPID=" spid
"; PON=" spid))))
(cons "Referer" referer))

とりあえずこれでいけるのは確認したよ。load-file してないとか。
直打ちなのがかっちょわるいけど。