🚀 go-pugleaf

I have defined a class named text-window and I am attempting to write a specialized version of format. My definition is:

(defmethod format ((tw text-window) string &rest arguments)
  "Specialized format for text-windows."
  (print-string-in-window tw (eval `(format nil ,string ,@arguments)))
  )

When I load the file containing this definition I get the following error:

>>Error: FORMAT already names an ordinary function or a macro

LUCID-RUNTIME-SUPPORT:DEFINE-METHOD:
   Required arg 0 (...
   Required arg 1 (...
   ...

    0: Flush the existing definition
    1: Convert current definition into default method
:C  2: Try loading "..." again
    ...
    ...

If I choose option 1 everythig works fine, I get exactly what I want (that is, both the old version and the specialized one). My problem is, is there a way of getting rid of the error message? In other words, can I "Convert the current definition into default method" directly from my program?

My Email address is: alb@ipvaim.unipv.it. Thank you in advance.

					Alberto Riva
					University of Pavia, Italy