Re: eval-after-load confusion

[Nicolas Richard]

Eric Abrahamsen <eric@ericabrahamsen.net> writes:
> ;; (eval-after-load 'message
> ;;   (let ((ign-headers-list
> ;;     (split-string message-ignored-mail-headers
> ;;                   "|"))
> ;;    (our-val (concat gnorb-mail-header "\\")))
> ;;     (unless (member our-val ign-headers-list)
> ;;       (setq ign-headers-list
> ;;        `(,@(butlast ign-headers-list 1) ,our-val
> ;;          ,@(last ign-headers-list 1)))
> ;;       (setq message-ignored-mail-headers
> ;;        (mapconcat
> ;;         'identity ign-headers-list "|")))))
>
> If I leave this block uncommented, I get a "void variable" error on
> startup, referencing 'message-ignored-mail-headers.

eval-after-load is a (normal) function, which means that each of its
argument is evaluated first, then eval-after-load is called with those
values. Adding a single quote before the (let ...) form should help.

-- 
Nico.