diff options
author | Stefan Kangas <stefan@marxist.se> | 2022-08-05 12:08:19 +0200 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2022-08-05 12:08:41 +0200 |
commit | 250f09d2f3927a650329dfb1165670f3d9b5bb5b (patch) | |
tree | 49f3e5ff93161816faa72aba3592a0fc6e6fd4df /lisp/cedet/ede/custom.el | |
parent | 5426f67006cd9b30dd3cb3768ba6ca59681f68e8 (diff) | |
download | emacs-250f09d2f3927a650329dfb1165670f3d9b5bb5b.tar.gz |
Fix namespace problem in ede/custom.el
* lisp/cedet/ede/custom.el (ede-eieio-old-variables): Rename from
'ede-eieio-old-variables'. Retain old name as an obsolete alias.
Diffstat (limited to 'lisp/cedet/ede/custom.el')
-rw-r--r-- | lisp/cedet/ede/custom.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/cedet/ede/custom.el b/lisp/cedet/ede/custom.el index 2d4f408e961..0854c8cc47f 100644 --- a/lisp/cedet/ede/custom.el +++ b/lisp/cedet/ede/custom.el @@ -35,7 +35,9 @@ (require 'ede) (eval-when-compile (require 'eieio-custom)) -(defvar eieio-ede-old-variables nil +(define-obsolete-variable-alias 'ede-eieio-old-variables + 'eieio-ede-old-variables "29.1") +(defvar ede-eieio-old-variables nil "The old variables for a project.") ;;; Customization Commands @@ -50,7 +52,7 @@ (let* ((ov (oref (ede-current-project) local-variables)) (cp (ede-current-project))) (ede-customize cp) - (setq-local eieio-ede-old-variables ov))) + (setq-local ede-eieio-old-variables ov))) ;;;###autoload (defalias 'customize-project #'ede-customize-project) @@ -178,9 +180,9 @@ OBJ is the target object to customize." ;; These hooks are used when finishing up a customization. (cl-defmethod eieio-done-customizing ((proj ede-project)) "Call this when a user finishes customizing PROJ." - (let ((ov eieio-ede-old-variables) + (let ((ov ede-eieio-old-variables) (nv (oref proj local-variables))) - (setq eieio-ede-old-variables nil) + (setq ede-eieio-old-variables nil) (while ov (if (not (assoc (car (car ov)) nv)) (save-excursion |