diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-02-04 13:49:49 -0500 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2015-02-04 13:49:49 -0500 |
| commit | 73b17f7c2b723a0ad4ea04cf1a5a8be5bbdf6121 (patch) | |
| tree | fc2ee663521960bf1c102bb98a72f31903e5110b /lisp/cedet/ede/custom.el | |
| parent | 102a21d68976ab9dc85304e0bc47b7562d3cf93f (diff) | |
* lisp/cedet: Use cl-generic instead of EIEIO's defgeneric/defmethod
* lisp/cedet/**/*.el: Mechanically replace all calls to defmethod/defgeneric
by calls to cl-defmethod/cl-defgeneric.
* lisp/cedet/srecode/table.el:
* lisp/cedet/srecode/fields.el:
* lisp/cedet/srecode/dictionary.el:
* lisp/cedet/srecode/compile.el:
* lisp/cedet/semantic/debug.el:
* lisp/cedet/semantic/db-ref.el:
* lisp/cedet/ede/base.el:
* lisp/cedet/ede/auto.el:
* lisp/cedet/ede.el: Require `cl-generic'.
Diffstat (limited to 'lisp/cedet/ede/custom.el')
| -rw-r--r-- | lisp/cedet/ede/custom.el | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lisp/cedet/ede/custom.el b/lisp/cedet/ede/custom.el index a39b488028..5b8783fd27 100644 --- a/lisp/cedet/ede/custom.el +++ b/lisp/cedet/ede/custom.el @@ -76,11 +76,11 @@ OBJ is the target object to customize." (error "No logical target to customize")) (ede-customize obj)) -(defmethod ede-customize ((proj ede-project)) +(cl-defmethod ede-customize ((proj ede-project)) "Customize the EDE project PROJ." (eieio-customize-object proj 'default)) -(defmethod ede-customize ((target ede-target)) +(cl-defmethod ede-customize ((target ede-target)) "Customize the EDE TARGET." (eieio-customize-object target 'default)) @@ -177,7 +177,7 @@ OBJ is the target object to customize." ;;; Customization hooks ;; ;; These hooks are used when finishing up a customization. -(defmethod eieio-done-customizing ((proj ede-project)) +(cl-defmethod eieio-done-customizing ((proj ede-project)) "Call this when a user finishes customizing PROJ." (let ((ov eieio-ede-old-variables) (nv (oref proj local-variables))) @@ -196,11 +196,11 @@ OBJ is the target object to customize." ;; These two methods should be implemented by subclasses of ;; project and targets in order to account for user specified ;; changes. -(defmethod eieio-done-customizing ((target ede-target)) +(cl-defmethod eieio-done-customizing ((target ede-target)) "Call this when a user finishes customizing TARGET." nil) -(defmethod ede-commit-project ((proj ede-project)) +(cl-defmethod ede-commit-project ((proj ede-project)) "Commit any change to PROJ to its file." nil ) |