From 0e20656a87e8e6277fa8ef1795f8de139b801f82 Mon Sep 17 00:00:00 2001 From: "Robert P. Goldman" <rpgoldman@gmail.com> Date: Tue, 21 Jan 2014 17:48:05 -0600 Subject: [PATCH] Tidied up the format control strings for errors. --- action.lisp | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/action.lisp b/action.lisp index efcb6487..157f88a6 100644 --- a/action.lisp +++ b/action.lisp @@ -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)))))) -- GitLab