[AUCTeX-devel] Re: [AUCTeX-diffs] Changes to auctex/context.el

[David Kastrup]

Berend de Boer <address@hidden> writes:

> Index: auctex/context.el
> diff -u auctex/context.el:1.55 auctex/context.el:1.56
> --- auctex/context.el:1.55    Wed May  3 21:46:09 2006
> +++ auctex/context.el Thu May  4 22:07:14 2006
> @@ -1429,7 +1429,13 @@
>  
>  (defun ConTeXt-mode-common-initialization ()
>    "Initialization code that is common for all ConTeXt interfaces."
> -  (plain-TeX-common-initialization)
> +  ;; `plain-TeX-common-initialization' kills all local variables, but
> +  ;; we need to keep ConTeXt-current-interface, so save and restore
> +  ;; it.
> +  (let (save-ConTeXt-current-interface)
> +    (setq save-ConTeXt-current-interface ConTeXt-current-interface)
> +    (plain-TeX-common-initialization)
> +    (setq ConTeXt-current-interface save-ConTeXt-current-interface))
>    (setq major-mode 'context-mode)
>  
>    ;; Make language specific variables buffer local

Wouldn't

  (let (ConTeXt-current-interface)
    (plain-TeX-common-initialization))

preserve the value of ConTeXt-current-interface ?

If not, it seems more straightforward to do

(setq ConTeXt-current-interface
      (prog1 ConTeXt-current-interface
             (plain-TeX-common-initialization)))

-- 
David Kastrup, Kriemhildstr. 15, 44793 Bochum