Commit 0e20656a authored by Robert P. Goldman's avatar Robert P. Goldman

Tidied up the format control strings for errors.

parent ed428096
......@@ -223,9 +223,7 @@ OPERATION objects."))
:finally (return nil))
(error 'operation-definition-error
:format-control
"No dependency propagating scheme specified for operation ~a.~
This is likely because the OPERATION subclass of this object has not been ~
updated for ASDF 3."
"No dependency propagating scheme specified for operation ~a. This is likely because the OPERATION subclass of this object has not been updated for ASDF 3."
:format-arguments (list obj))))
(defmethod initialize-instance :before ((obj non-propagating-operation) &key)
......@@ -237,8 +235,7 @@ updated for ASDF 3."
:finally (return nil))
(error 'operation-definition-error
:format-control
"Inconsistent class: ~a No class should have both NON-PROPAGATING-OPERATION and a propagating
operation class as superclasses."
"Inconsistent class: ~a. No class should have both NON-PROPAGATING-OPERATION and a propagating operation class as superclasses."
:format-arguments
(list
(class-name (class-of obj))))))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment