Re: add-list local value

["Lennart Borgman (gmail)" <lennart.borgman@gmail.com>]

Juanma Barranquero wrote:
> On Wed, Mar 12, 2008 at 3:18 AM, Lennart Borgman (gmail)
> <lennart.borgman@gmail.com> wrote:
> 
>>  And if I have a local value and want to add to the global value with
>>  add-to-list?
> 
> (with-temp-buffer (add-to-list 'my-variable 'my-value))
> 
> unless the variable is automatically buffer-local. If it is, I think
> it would be uncommon to modify the global value (it would be more
> logical to just set it up with defvar), but you can always skip the
> `add-to-list' and assign to my-variable with setq-default.

Thanks, yes, something like this perhaps

(defun add-to-global-list (list-var element &optional append compare-fn)
   (let ((global-val (default-value list-var)))
     (add-to-list 'global-val element append compare-fn)
     (set-default list-var global-val)))

But I would prefer that add-to-list did it for me.