bug-auctex
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Bug-AUCTeX] 11.81; removing AUCTeX


From: Ralf Angeli
Subject: Re: [Bug-AUCTeX] 11.81; removing AUCTeX
Date: Fri, 18 Nov 2005 16:08:24 +0100
User-agent: Gnus/5.110004 (No Gnus v0.4) Emacs/22.0.50 (gnu/linux)

* Les Saper (2005-11-16) writes:

> (unload-feature 'tex-site)
[...]
> Debugger entered--Lisp error: (wrong-type-argument listp texinfo)
>   assq-delete-all(TeX-modes-set (texinfo (TeX-modes-set (quote TeX-modes) 
> TeX-modes t)))

Does it help if you put the following forms into your .emacs file
before you call `unload-feature'?

(remove-hook 'tex-site-unload-hook
             (lambda ()
               (let ((list after-load-alist))
                 (while list
                   (assq-delete-all 'TeX-modes-set (car list))
                   (setq list (cdr list))))
               (setq load-path (delq TeX-lisp-directory load-path))))
(add-hook 'tex-site-unload-hook
          (lambda ()
            (let ((list after-load-alist))
              (while list
                ;; Substitute for `(assq-delete-all'TeX-modes-set (car
                ;; list))' which fails on non-list elements in Emacs 21.
                (let ((tail (car list)))
                  (while tail
                    (if (and (consp (car tail))
                             (eq (car (car tail)) 'TeX-modes-set))
                        (setcar list (delq (car tail) (car list))))
                    (setq tail (cdr tail))))
                (setq list (cdr list))))
            (setq load-path (delq TeX-lisp-directory load-path))))

-- 
Ralf




reply via email to

[Prev in Thread] Current Thread [Next in Thread]