Re: [AUCTeX-devel] Re: Usability of docTeX-mode

[David Kastrup]

Ralf Angeli <address@hidden> writes:

> * David Kastrup (2006-07-22) writes:
>
>> (defcustom foo '(c d e)
>>   "Some var."
>>   :set 'TeX-local-list-setter)
>> (make-local-variable 'foo)
>> (add-to-list 'foo 'a)
>> (add-to-list 'foo 'b)
>> (customize-variable 'foo)
>
> Evaluating the defcustom form results in
>
> Debugger entered--Lisp error: (void-variable foo)

Uh yes.  One would probably have to check for boundness:

(defun TeX-local-list-setter (var value)
  (when (boundp var)
    (let ((old (symbol-value var)) tail)
      (dolist (buffer (buffer-list))
        (when (local-variable-p var buffer)
          (with-current-buffer buffer
            (setq tail (symbol-value var))
            (while (consp tail)
              (if (eq (cdr tail) old)
                  (progn
                    (setcdr tail value)
                    (setq tail nil))
                (setq tail (cdr tail)))))))))
  (custom-set-default var value))

-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum