]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix namespace problem in ede/custom.el
authorStefan Kangas <stefan@marxist.se>
Fri, 5 Aug 2022 10:08:19 +0000 (12:08 +0200)
committerStefan Kangas <stefan@marxist.se>
Fri, 5 Aug 2022 10:08:41 +0000 (12:08 +0200)
* lisp/cedet/ede/custom.el (ede-eieio-old-variables): Rename from
'ede-eieio-old-variables'.  Retain old name as an obsolete alias.

lisp/cedet/ede/custom.el

index 2d4f408e96199d03d797cb6309900ec380e3407b..0854c8cc47f2b46d64db6d3efcb72872b5473b28 100644 (file)
@@ -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