Re: custom: how do I augment an option?

[Sam Steingold]

> * Sam Steingold <fqf@tah.bet> [2012-09-05 13:56:20 -0400]:
>
> (custom-set-variables
>  '(message-syntax-checks (adjoin '(long-lines . disabled)
>                                  message-syntax-checks
>                                  :key 'equal)))
> will evaluate `message-syntax-checks' too early:

The "solution" is
--8<---------------cut here---------------start------------->8---
(custom-set-variables
 '(message-syntax-checks
   (adjoin '(long-lines . disabled)
    (eval (car (get 'message-syntax-checks 'standard-value)))
    :test 'equal)))
--8<---------------cut here---------------end--------------->8---
which uses `eval' on top of `adjoin'.

So, what is the official method?

-- 
Sam Steingold (http://sds.podval.org/) on Ubuntu 12.04 (precise) X 11.0.11103000
http://www.childpsy.net/ http://dhimmi.com http://jihadwatch.org
http://honestreporting.com http://iris.org.il http://thereligionofpeace.com
Save your burned out bulbs for me, I'm building my own dark room.