]> code.delx.au - gnu-emacs/blobdiff - lisp/cedet/ede/shell.el
* lisp/cedet: Use cl-generic instead of EIEIO's defgeneric/defmethod
[gnu-emacs] / lisp / cedet / ede / shell.el
index e15ca19ac54be8a9a57d712d21b8bc1dd89bd1e3..bdb5d302287bea628fb7369d2a470f84cfa45618 100644 (file)
@@ -33,7 +33,7 @@
 
 (declare-function comint-send-input "comint")
 
-(defmethod ede-shell-run-something ((target ede-target) command)
+(cl-defmethod ede-shell-run-something ((target ede-target) command)
   "Create a shell to run stuff for TARGET.
 COMMAND is a text string representing the thing to be run."
   (let* ((buff (ede-shell-buffer target))
@@ -72,7 +72,7 @@ COMMAND is a text string representing the thing to be run."
   (comint-send-input)
   )
 
-(defmethod ede-shell-buffer ((target ede-target))
+(cl-defmethod ede-shell-buffer ((target ede-target))
   "Get the buffer for running shell commands for TARGET."
   (let ((name (ede-name target)))
     (get-buffer-create (format "*EDE Shell %s*" name))))