>>>>> "Paul" == Paul Kinnucan <[EMAIL PROTECTED]> writes:

  Paul> As I never tire of pointing out, you must use customize to
  Paul> custome the JDE.

        Paul

        May I suggest the following solution to this problem. Stick
this at the beginning of jde.el

(defvar jde-disable-setq-advice nil)

(defmacro jde-setq (symbol value)
  (let ((jde-disable-setq-advice t))
    `(setq ,symbol ,value)))

(defadvice setq (before jde-test-for-custom activate)
  (if (and (string-match "jde-" (symbol-name (ad-get-arg 0)))
           (not jde-disable-setq-advice))
      (error "Warning. Setting jde variables without using custom is liable to turn 
Paul Kinnucan nasty")))

      
      and then do a search and replace for every occurrence of 
"setq" within JDE, with jde-setq.

       Cheers

       Phil

Reply via email to