[Ecls-list] [Patch] fix :list -> :format-arguments in src/clos/generic.lsp
Tobias C. Rittweiler
tcr at freebits.de
Thu Mar 11 12:27:54 UTC 2010
diff --git a/src/clos/generic.lsp b/src/clos/generic.lsp
index 2b852bf..0e7a8e4 100644
--- a/src/clos/generic.lsp
+++ b/src/clos/generic.lsp
@@ -146,13 +146,13 @@
(member (first method-combination) *method-combinations*)))
(error 'simple-type-error
:format-control "Not a valid method combination, ~A"
- :list (list method-combination)
+ :format-arguments (list method-combination)
:datum method-combination
:expected-type 'list))
(unless (si::subclassp method-class (find-class 'method))
(error 'simple-type-error
:format-control "Not a valid method class, ~A"
- :list (list method-class)
+ :format-arguments (list method-class)
:datum method-class
:expected-type 'method))
;;
More information about the ecl-devel
mailing list